在
ASP里使用 w3 Jmail4.3 组件发送邮件的代码
w3 Jmail4.3组件重新设计了其内部结构,使用Message对象代替原来的单一对象Jmail.smtpmail发送邮件,有些方法需要身份验证的(如163、yahoo等),可以用下面的方法解决:
<%
Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
jmail.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值
jmail.logging = true '启用邮件日志
jmail.Charset = "GB2312" '邮件的文字编码为国标
jmail.AddRecipient "[email]tom@163.com[/email]" '邮件收件人的地址
jmail.From = "[email]abc@163.com[/email]" '发件人的E-MAIL地址,注意: 部分服务器需要把 邮件地址写全,如[email]abc@zccn.net[/email]
jmail.MailServerUserName = " [email]abc@163.com[/email] " '登录邮件服务器所需的用户名,注意部分不是 ABC
jmail.MailServerPassword = "Password of Email" '登录邮件服务器所需的密码
jmail.Subject = "Mail Subject" '邮件的标题
jmail.Body = "Mail Body" '邮件的内容
jmail.Send("???.域名 .com") '执行邮件发送(通过邮件服务器地址)smtp. 域名.com 不一定是邮件服务器
jmail.Close() '关闭对象
set jmail = nothing
Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
jmail.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值
jmail.logging = true '启用邮件日志
jmail.Charset = "GB2312" '邮件的文字编码为国标
jmail.AddRecipient "[email]tom@163.com[/email]" '邮件收件人的地址
jmail.From = "[email]abc@163.com[/email]" '发件人的E-MAIL地址,注意: 部分服务器需要把 邮件地址写全,如[email]abc@zccn.net[/email]
jmail.MailServerUserName = " [email]abc@163.com[/email] " '登录邮件服务器所需的用户名,注意部分不是 ABC
jmail.MailServerPassword = "Password of Email" '登录邮件服务器所需的密码
jmail.Subject = "Mail Subject" '邮件的标题
jmail.Body = "Mail Body" '邮件的内容
jmail.Send("???.域名 .com") '执行邮件发送(通过邮件服务器地址)smtp. 域名.com 不一定是邮件服务器
jmail.Close() '关闭对象
set jmail = nothing
%>