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

ASP
ASP正则表达式技巧
ASP Access实现网站计数器(访问量)
ASP新闻分页,将一篇过长的文章分页,生成静态页面
一些关于asp 购物车的想法
一个sql查询器,自动画表格填字段
ASP实现文件直接下载的代码
把网页中的(电话,qq等数字)生成图片的ASP程序
asp长文章用分页符来分页显示
Asp函数介紹(37个常用函数)
ASP中的面向对象类
分页实现方法的性能比较
asp ajax跨域提交数据
asp修改文件和文件夹的名字的代码
ASP 多关键词查询实例代码
asp被杀毒软件误删的解决方法
asp 多关键词搜索的简单实现方法
asp 根据IP地址自动判断转向分站的代码
asp dictionary对象的用法
ASP 千万级数据分页的存储过程
ASP隐藏真实文件的下载功能实现代码

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


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