当前位置: 首页 > 图文教程 > 网络编程 > ASP > Jmail组件发送邮件之绝对能用的函数

ASP
对连串英文自动换行的解决方法 IE5.5
怎样写你自己的EMAIL组件(原理)
ASP中有关timeout超时的体会
用ASP实现从SQL Server导出数据到Access
ASP向NT域中加一个用户
ASP乱码的解决方法
关于 aspsmartupload 注册问题
利用XML不离开页面刷新数据
IIS 处理 SEARCH 请求漏洞
不用组件实现上载功能(1)
不用组件实现上载功能(2)
在网页中实现OICQ里的头像选择的下拉框
仅用xsl和asp实现分页功能
如何使用context()方法将数据置入表格(XML)
利用ASP从远程服务器上接收XML数据
将数据库里面的内容生成EXCEL
怎样在ASP里面创建统计图表
加密你的Access数据库
利用global.asp定时执行ASP
加密QueryString数据

ASP 中的 Jmail组件发送邮件之绝对能用的函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 157 ::
收藏到网摘: n/a

Jmail组件的这些对象为服务器端对邮件的操作提供了各种各样的功能,每个对象都有其独特应用,大致如下:
1,POP3对象,是对POP3邮件接收服务器的操作。
2,Messages对象,是有关邮件集合的对象。
3,Message对象,是有关邮件的对象,其是Jmail组件最常用的对象,能发送邮件信息,也能接收邮件信息。
4,Header对象,是与邮件头相关的对象。
5,Recipients对象,是有关接收邮件集合的对象。
6,Recipient对象,是有关接收邮件的对象。
7,Attachments对象,是有关邮件附件集合的对象。
8,Attachment对象,是有关邮件附件的对象。
9,MailMerge对象,是有关邮件模板的对象。
10,PGPKeys对象,是有关邮件PGP密钥集合的对象。
11,PGPKeyInfo对象,是有关邮件PGP密钥信息的对象。
……
在邮件发送的Web应用中,Message对象是最常用的,在使用之前需要建立该对象,并赋值到变量上。

Set jmail = Server.CreateObject("JMAIL.Message")

其中关于Message对象有如下常用的属性和方法应用:
1,Silent属性,表示屏蔽例外错误,返回FALSE或TRUE值,当值为TRUE时,表示邮件发送会忽略错误,不将错误信息返回给操作系统。
jmail.silent = true
2,Logging属性,表示是否启用日志。
jmail.logging = true
3,Charset属性,设置邮件显示的字符集,中文简体可使用GB2312。
jmail.Charset = "GB2312"
4,ContentType属性,表示邮件正文的类型。
jmail.ContentType = "text/html"
5,AddRecipient方法,表示收件人的E-Mail地址。
jmail.AddRecipient ("[email protected]")
6,From属性,表示发件人的E-Mail地址。该地址一般与使用SMTP服务器验证时所需的登录帐户相同。
jmail.From = "[email protected]"
7,FromName属性,表示发件人的名称。
jmail.FromName = "BruceWolf"
8,Subject属性,表示设置发送邮件的标题。
jmail.Subject = "这是邮件的标题"
9,Body属性,表示设置发送邮件的正文内容,可使用HTML标签代码
jmail.Body = "这是邮件的内容<br>换行的内容显示"
10,Priority属性,表示邮件发送的优先级,1为最快,5为最慢,3为默认值。
jmail.Priority = 1
11,MailServerUserName属性,表示当邮件服务器使用SMTP发信验证时设置的登录帐户。
jmail.MailServerUserName = "[email protected]"
12,MailServerPassword属性,表示当邮件服务器使用SMTP发信验证时设置的登录密码。
jmail.MailServerPassword = "**************"
13,Send方法,表示通过指定的邮件发送服务器进行邮件的发送。需要注意的即是该邮件服务器地址与MailServerUserName和MailServerPassword中的值是一致的。
jmail.Send("smtp.126.com")
14,Close方法,表示释放Jmail和邮件服务器连接而使用的缓存空间。
jmail.Close()
由于采用邮件服务器的不同,发送邮件接收人的不同,以及邮件标题和内容的不同,综合这些经常需要变化的值,自定义如下的函数用来完成Jmail发送邮件的功能。
Jmail邮件发送的函数

<%
Function Send_Email(smtpHost,smtpUser,smtpPass,mailTo,FromName,subject,content)
Set jmail = Server.CreateObject("JMAIL.Message")
jmail.silent = true
jmail.logging = true
jmail.Charset = "gb2312"
jmail.ContentType = "text/html"
jmail.AddRecipient mailTo
jmail.From = smtpUser
jmail.FromName = FromName
jmail.Subject = subject
jmail.Body = content
jmail.Priority = 1
jmail.MailServerUserName = smtpUser
jmail.MailServerPassword = smtpPass
jmail.Send(smtpHost)
jmail.Close()
response.write("邮件发送成功")
End Function
%>

其中Send_Email表示自定义的函数名称
参数smtpHost表示邮件服务器地址
参数smtpUser表示发信验证所需的登录帐户
参数smtpPass表示发信验证所需的登录密码
参数mailTo表示邮件收件人的E-Mail地址
参数FromName表示邮件发件人的名称
而参数subject和content则分别表示邮件的标题和正文内容
通过如下方法可应用该函数:
Call Send_EMail("smtp.126.com","[email protected]","******","[email protected]","cnbruce","标题","邮件正文内容")
或者有个人邮局的可使用
Call Send_EMail("mail.cnbruce.com","[email protected]","******","[email protected]","cnbruce","标题","邮件正文内容")
调试地址: http://www.dw8.cn/2006/mail