'邮箱开始
sitename="驾校一点通"
UserName="小新"
userid=122
user_password=456
mailserver="smtp.163.com " 'smtp服务器地址
mailname="chenjianxin1983@163.com" '发信邮箱
mailpassword="51500778" '发信邮箱密码
dim msg
CLStr=Chr(13) & Chr(10)
Set msg=Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = mailname
msg.MailServerPassword = mailpassword
msg.From = mailname
msg.FromName = mailname
msg.AddRecipient (mailname) 'usermail为网站会员注册时填写的ID
msg.Subject = "您在“"&sitename&"”注册成功"
msg.Body = UserName&",您好!"&CLStr&CLStr
msg.Body = msg.Body&"恭喜您注册会员成功,会员ID:"&userid&",登陆密码:"&user_password&CLStr&CLStr
msg.Body = msg.Body&sitename&"("&siteurl&")欢迎您多多光临!谢谢!"&CLStr
msg.Send (mailserver)
msg.close
set msg = nothing
'邮箱结束
本内容试读结束,登录后可阅读更多
下载后可阅读完整内容,剩余1页未读,立即下载