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

ASP
构建你的网站新闻自动发布系统之三
构建你的网站新闻自动发布系统之四
如何用ASP编写网站统计系统一
如何用ASP编写网站统计系统二
如何用ASP编写网站统计系统三
如何用ASP编写网站统计系统四
ASP Error 0115的一些解决办法
ASP 3.0 新特色先睹为快(一)
ASP 3.0 新特色先睹为快(二)
ASP主件中的安全问题
一个汉字转成拼音的代码
使用w3Sockets组件实现域名查询功能
ASP中实现文件上传方法的研究
构建免受FSO组件威胁虚拟主机
用XMLHTTP做一个自己特色的Google
用asp实现的代码批量修改程序
无组件的数据库的备份与还原
用ASPJPEG组件制作图片的缩略图和加水印
解密ASP源代码
XmlHttp异步获取网站数据的例子

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 247 ::
收藏到网摘: 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