ASP发MAIL示例

最新推荐文章于 2021-07-30 18:05:26 发布
转载 最新推荐文章于 2021-07-30 18:05:26 发布 · 1.1k 阅读 · 0
文章标签：

#asp #google #input #border #function #action

该博客提供了ASP发MAIL的示例代码。代码包含收件人、发件人地址，邮件主题和内容的输入验证，使用CDONTS.NewMail对象发送邮件，还提供了验证邮箱格式的函数，确保输入的邮箱地址合法。

ASP发MAIL示例

<%
inputMailTo = Trim(Request.Form("inputMailTo"))
inputMailFrom = Trim(Request.Form("inputMailFrom"))
inputMailSubject = Trim(Request.Form("inputMailSubject"))
textBoxMailBody = Trim(Request.Form("textBoxMailBody"))

dim ErrMsgInputMailTo,ErrMsgInputMailFrom,ErrMsgInputMailSubject,ErrMsgTextBoxMailBody,MsgSendResult

sendMail

sub sendMail()
if inputMailTo = "" then
ErrMsgInputMailTo = "不能为空"
exit sub
end if
if ValidateEmail(inputMailTo) = false then
ErrMsgInputMailTo = "E-Mail Address Error"
exit sub
end if
if inputMailFrom = "" then
ErrMsgInputMailFrom = "不能为空"
exit sub
end if
if ValidateEmail(inputMailFrom) = false then
ErrMsgInputMailFrom = "E-Mail Address Error"
exit sub
end if
if inputMailSubject = "" then
ErrMsgInputMailSubject = "不能为空"
exit sub
end if
if textBoxMailBody = "" then
ErrMsgTextBoxMailBody = "不能为空"
exit sub
end if

Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = inputMailTo
mail.From = inputMailFrom
mail.Subject = inputMailSubject
mail.Body = textBoxMailBody
mail.Send

MsgSendResult = "发送成功！From: " + inputMailFrom + "; To: " + inputMailTo

end sub
%>
<html>
<head>
<title>发送邮件 By ASP</title>
</head>
<body>
<div align="center">

<table width="100%" border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#eeeeee" id="AutoNumber1">
<form id="formMail" method="post" action="">
<tr>
<td width="20%" height="24">收件人地址: </td>
<td width="80%" height="24">
<input type="text" id="inputMailTo" name="inputMailTo" size="48" value="<% = inputMailTo %>
">
<font color="#ff0000">
<strong>
<% = ErrMsgInputMailTo %>
</strong>
</font>
</td>
</tr>
<tr>
<td width="20%" height="24">发件人地址: </td>
<td width="80%" height="24">
<input type="text" id="inputMailFrom" name="inputMailFrom" size="48" value="<% = inputMailFrom %>
">
<font color="#ff0000">
<strong>
<% = ErrMsgInputMailFrom %>
</strong>
</font>
</td>
</tr>
<tr>
<td width="20%" height="24">邮件主题: </td>
<td width="80%" height="24">
<input type="text" id="inputMailSubject" name="inputMailSubject" size="48" value="<% = inputMailSubject %>
">
<font color="#ff0000">
<strong>
<% = ErrMsgInputMailSubject %>
</strong>
</font>
</td>
</tr>
<tr>
<td width="20%" height="24">邮件内容: </td>
<td width="80%" height="24">
<textarea id="textBoxMailBody" name="textBoxMailBody" Rows="6" Cols="48">
<% = textBoxMailBody %>
</textarea>
<font color="#ff0000">
<strong>
<% = ErrMsgTextBoxMailBody %>
</strong>
</font>
</td>
</tr>
<tr>
<td colspan="2" align="center">
<input type="submit" value="Send Mail" id="buttonSendMail" name="buttonSendMail">
</td>
</tr>
<tr>
<td colspan="2" align="center" height="24">
</td>
</tr>
<tr>
<td colspan="2" align="center">
<font color="#ff0000">
<strong>
<% = MsgSendResult %>
</strong>
</font>
</td>
</tr>
</form>
</table>

</div>
</body>
</html>

<%
Function ValidateEmail(Expression)
Dim objRegExp
Set objRegExp = New RegExp
objRegExp.Pattern = "^[/w/.-]+@[/w/.-]+/.[a-zA-Z]+$"
ValidateEmail = objRegExp.Test(Expression)
End Function
%>

<script src="http://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"> </script>
HPsoft
关注
用asp开发邮件群发功能
jiyc2008的博客
07-03 606
在ASP中群发邮件，可以使用CDO (Collaboration Data Objects) 或JMail组件。实际应用中，也可以使用jmail组件或者aspmail组件来开发邮件群发功能。
asp.net发邮件示例
10-26
本示例展示了如何在ASP.NET应用中实现基于SMTP协议的邮件发送功能。通过配置文件管理发送参数、利用邮件实体类组织邮件信息、结合HTML模板提高邮件的可定制性，最终实现了自动化邮件发送流程。对于需要集成邮件通知...
用ASP发电子邮件
okook的专栏
05-26 1851
用ASP发电子邮件Dim strTo, strSubject, strBody Strings for recipient, subject, bobyDim objCDOMail The CDO objectFirst well read in the values enteredstrTo = Request.Form("to")These would read the messag
ASP:ASPMAIL
alyosha_liao的专栏
05-02 487
 Set Mail = Server.CreateObject("Persits.MailSender") Mail.From= "ittest@163.com"  Mail.AddCC "bb@163.com","bb"    Mail.AddAddress "aa@163.com","aa"    Mail.Subject = "asp mail test"Mail.IsHTML = True
数字邮件服务器,使用aspmail组件发送数字卡片_邮件服务器
weixin_30750685的博客
07-30 2877
…… border=0 height=51 width=110>……As you see in this example I use an image for Submit Button, and another image for reset button, at the reset button I made a reload of the page (refresh) t...
asp发送邮件的几种方法
asp、.net专栏
05-30 4350
Set mail = Server.CreateObject("CDONTS.NewMail")mail.TO = "abc@xxx.com"mail.From = "yourmail@xxx.com"mail.Subject = "主题"mail.Body = "E-Mail内容"mail.Send%> Set objSMTP= CreateObject("CMailCOM.SMTP.1
asp.net发邮件
Aoject
05-17 1495
asp.net 发送邮件代码 说到发送邮件发送，先提一下SMTP(呵呵，高手就跳过这一段吧！)。 SMTP的全称是“Simple Mail Transfer Protocol”，即简单邮件传输协议。它是一组用于从源地址到目的地址传输邮件的规范，通过它来控制邮件的中转方式。SMTP 协议属于 TCP/IP 协议簇，它帮助每台计算机在发送或中转信件时找到下一个目的地。SMTP 服务器就是遵循 S
asp.net发送邮件示例
ASP.NET
09-11 818
mailhelper  -------mail帮助类 using System; using System.Collections.Generic; using System.Linq; using System.Web; using System.Web.Mail; /// ///mailhelper 的摘要说明 /// public class mailhelper { publ
精选资源
asp.net发送邮件示例分享
01-02
mailhelper ——-mail帮助类 代码如下:using System;using System.Collections.Generic;using System.Linq;using System.Web;using System.Web.Mail; /// <summary>///mailhelper 的摘要说明/// </summary>public ...
ASP.NET邮件发送system.Net.Mail案例
01-20
这个例子展示了ASP.NET应用程序如何通过用户界面收集输入，然后使用`System.Net.Mail`发送邮件。开发者可以基于这个模板进行扩展，比如添加错误处理、验证用户输入、支持多个附件、自定义SMTP服务器配置等。在实际...
【电动车优化调度】基于模型预测控制(MPC)的凸优化算法的电动车优化调度（Matlab代码实现）
最新发布
12-26
【电动车优化调度】基于模型预测控制(MPC)的凸优化算法的电动车优化调度（Matlab代码实现）内容概要：本文介绍了基于模型预测控制（MPC）的凸优化算法在电动车优化调度中的应用，并提供了Matlab代码实现。该方法结合了MPC的滚动优化特性与凸优化的高效求解能力，用于解决电动车充电调度问题，提升电网运行效率与可再生能源消纳能力。文中还提及多个相关研究方向和技术支撑，包括智能优化算法、机器学习、电力系统管理等，展示了其在多领域交叉应用的潜力。配套资源可通过提供的网盘链接获取，涵盖YALMIP工具包及其他完整仿真资源。; 适合人群：具备一定电力系统、优化理论及Matlab编程基础的科研人员和研究生，尤其适合从事电动汽车调度、智能电网优化等相关课题的研究者。; 使用场景及目标：①实现电动车集群在分时电价或电网需求响应机制下的有序充电调度；②结合可再生能源出力与负荷预测，利用MPC进行多时段滚动优化，降低电网峰谷差，提高能源利用效率；③为学术论文复现、课题研究及工程仿真提供可靠的技术路线与代码支持。; 阅读建议：建议读者结合文档中提到的智能优化算法与电力系统背景知识进行系统学习，优先掌握MPC基本原理与凸优化建模方法，并下载配套资源调试代码，以加深对电动车调度模型构建与求解过程的理解。
基于XGBoost机器学习算法融合历史气象数据构建广州市极端天气高精度短期预测模型以提升城市防灾减灾与运行韧性_广州市2014-2024年历史气象数据台风暴雨高温极端天.zip
12-26
基于XGBoost机器学习算法融合历史气象数据构建广州市极端天气高精度短期预测模型以提升城市防灾减灾与运行韧性_广州市2014-2024年历史气象数据台风暴雨高温极端天.zip
电动机三相感应电动机TIM间接磁场定向控制IFOC研究（Matlab代码实现）
12-26
【电动机】三相感应电动机TIM间接磁场定向控制IFOC研究（Matlab代码实现）内容概要：本文主要研究三相感应电动机（TIM）的间接磁场定向控制（IFOC），通过Matlab代码实现控制系统的设计与仿真。重点在于构建IFOC系统的核心算法，包括转子磁链观测、坐标变换、PI调节器设计以及空间矢量脉宽调制（SVPWM）等关键技术环节，从而实现对电动机转速和转矩的高性能控制。文中详细阐述了控制策略的理论基础与建模过程，并借助Matlab/Simulink平台验证系统的动态响应、抗干扰能力及稳定性，为电机驱动系统的工程应用提供参考。; 适合人群：具备电机控制基础知识和Matlab仿真经验的电气工程及相关专业的研究生、科研人员及从事电机驱动开发的工程师。; 使用场景及目标：①深入理解间接磁场定向控制的基本原理与实现方法；②掌握Matlab/Simulink在电机控制系统建模与仿真中的应用；③为实际工程项目中高性能电机控制算法的开发与优化提供技术支撑。; 阅读建议：建议读者结合电机控制理论教材同步学习，重点关注IFOC各模块的数学推导与参数整定方法，并动手运行和调试所提供的Matlab代码，以加深对控制逻辑和系统性能的理解。
【嵌入式系统】基于51单片机的14段数码管驱动设计：字符显示与动态扫描控制程序开发
12-26
内容概要：本文介绍了基于51单片机驱动14段数码管的技术实现方法，重点提供了用于显示数字与字母的段码数组定义及控制逻辑代码。文中给出了完整的C语言程序，通过定义ShuMaGuan14[][]二维数组存储0~9、A~Z字符对应的段码值，利用P0和P1端口输出反向段码驱动数码管，并实现了动态刷新与字符轮显功能。代码中还包含对特殊字符（如5和S相同）的处理以及额外的灯光效果设计。文章源自优快云博客，侧重于嵌入式开发中的硬件驱动编程实践。; 适合人群：具备基本单片机开发能力、熟悉C语言和51系列微控制器的电子爱好者或初级工程师；适合有一定嵌入式系统学习基础的学生或技术人员； 使用场景及目标：①学习14段数码管的工作原理与驱动方式；②掌握段码表的设计与生成方法；③理解单片机IO口控制、延时刷新与多字符显示逻辑；④应用于实际项目中的数码管显示模块开发； 阅读建议：建议结合Keil等开发环境进行仿真调试，配合硬件电路图理解端口输出逻辑，注意段码取反操作的原因（共阳极数码管），并可扩展增加按键控制或更多字符支持以加深理解。
springboot结合redis实现秒杀功能
12-26
代码下载地址： https://pan.quark.cn/s/a4b39357ea24 spring-boot-demo 统一异常处理 Swagger Druid Mybatis Redis MongoDB 使用同一的异常处理 配置 集成swagger 配置 使用 访问： 集成Druid 配置 使用来替换默认配置 因为暂时没有专门提供给的定制版本，所以需要手动配置的属性。 : 配置状态监控的与 Filter与Servlet配置. 直接访问，输入账号密码即可进入监控。 集成Mybatis 配置 使用 来将数据库的下划线格式自动转换为驼峰格式。 推荐使用注解，替代复杂的文件 的使用 集成Redis 配置 使用 集成Mongo 配置 使用
基于飞桨深度学习框架复现SRGAN模型实现单张图像超分辨率重构的详细项目_该项目专注于利用生成对抗网络技术对低分辨率图像进行四倍放大因子下的高保真度超分辨率重建通过结合感知损失和.zip
12-26
基于飞桨深度学习框架复现SRGAN模型实现单张图像超分辨率重构的详细项目_该项目专注于利用生成对抗网络技术对低分辨率图像进行四倍放大因子下的高保真度超分辨率重建通过结合感知损失和.zip
【JavaScript】基于 WED 前端脚本框架的开发支持方案！解决前端开发效率低痛点.zip
12-26
【JavaScript】基于 WED 前端脚本框架的开发支持方案！解决前端开发效率低痛点.zip
ASP.NET邮箱发送教程与示例代码
"ASP.NET 发邮件示例代码" 在ASP.NET中发送电子邮件是一个常见的任务，通常用于通知、确认或与用户进行通信。以下是一个使用C#编写的ASP.NET发送邮件的示例代码。这个例子展示了如何配置和使用SMTP服务器来发送邮件...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值