主题:  解决用jmail发信时,邮件服务器要求验证的问题[原创]

闪电

职务:普通成员
等级:1
金币:0.0
发贴:3
#12002/10/31 10:33:46
我在网上化了不少时间,终于找到这段“解决用jmail发信时,邮件服务器要求验证的问题”的代码,贴出来大家共享。

dim JMail
Set JMail=Server.CreateObject("JMail.Message")
JMail.silent = true '则errorcode包含的是错误代码
JMail.Logging=True '是否使用日志
JMail.Charset="gb2312"
JMail.ContentType = "text/html" 'text/html是超文本格式text/plain是文本格式
JMail.MailServerUserName = "sd99@sd99.com" '您的邮件服务器登录名
JMail.MailServerPassword = "123123" '登录密码
JMail.From ="sd99@sd99.com" '发件人
JMail.FromName = "江山交友网" '发件人姓名
JMail.AddRecipient "elin_007@sina.com" '收件人
JMail.Subject = "您在江山交友网的密码" '主题
JMail.Body = AccountName & ":你好!您在江山交友网的密码是 "&PassWord '正文
JMail.Send "mail.sd99.com" 'smtp服务器地址
JMail.Priority=3 '1: 最高优先级.2:高 3:普通 4:低 5:最低
if err then err.description
Set JMail=nothing