Set msg = Server.CreateObject("JMail.Message")
msg.silent = true '屏蔽例外错误,返回false跟true.
msg.Logging = true '启用邮件日志
msg.ISOEncodeHeaders = False '是否进行ISO编码,默认为True
msg.Charset = "gb2312" '邮件字符集,默认为"US-ASCII"
msg.ContentType = "text/html" '邮件的格式为HTML格式,若启用则信中可使用html代码
msg.MailServerUserName=username 'smtp服务器验证登陆名(邮局中任何一个用户的Email地址)
msg.MailServerPassword = pass '输入smtp服务器验证密码(用户Email帐号对应的密码)
msg.From = faxinren '发件人Email
msg.FromName = xingming '发件人姓名
msg.AddRecipient shou '收件人Email,要想给多人发信,可重复此句
msg.Subject = zhuti '信件主题 "
msg.Body = '信件内容
msg.Prority = 1 '邮件的紧急程序,(1-5);1 为最快,5 为最慢, 3 为默认值
msg.Send() 'smtp服务器地址
msg.close()
Set msg= Nothing
msg.silent = true '屏蔽例外错误,返回false跟true.
msg.Logging = true '启用邮件日志
msg.ISOEncodeHeaders = False '是否进行ISO编码,默认为True
msg.Charset = "gb2312" '邮件字符集,默认为"US-ASCII"
msg.ContentType = "text/html" '邮件的格式为HTML格式,若启用则信中可使用html代码
msg.MailServerUserName=username 'smtp服务器验证登陆名(邮局中任何一个用户的Email地址)
msg.MailServerPassword = pass '输入smtp服务器验证密码(用户Email帐号对应的密码)
msg.From = faxinren '发件人Email
msg.FromName = xingming '发件人姓名
msg.AddRecipient shou '收件人Email,要想给多人发信,可重复此句
msg.Subject = zhuti '信件主题 "
msg.Body = '信件内容
msg.Prority = 1 '邮件的紧急程序,(1-5);1 为最快,5 为最慢, 3 为默认值
msg.Send() 'smtp服务器地址
msg.close()
Set msg= Nothing
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货