发布时间:2013-09-19 11:33:46来源:阅读(1009)
asp邮件发送代码,经测试,163的邮箱可以发送!其它的邮箱还未做发送邮件测试呢。呵呵!
邮件组件为 W3 jmail 4.3,侠客站长站推荐大家测试一下吧!
<%
Set msg=Server.CreateObject("Jmail.Message")
msg.silent=true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = "yonghu" '163邮箱用户名
msg.MailServerPassword = "126456" '163邮箱的用户密码
msg.From = "yonghu@163.com" '邮件接收人地址
msg.FromName = "名称" '发件人名称
msg.AddRecipient "shouxin@qq.com" '接收人信箱
msg.Subject = "注册信息(自动发信,请勿回复)" '邮件标题
msg.HtmlBody = "您已在本站注册成功,谢谢您的支持" '邮件内容
msg.Priority = 1 '优先级最高 1最快 3默认 5最慢
pan = msg.Send ("smtp.163.com") '邮件服务器地址
set msg = Nothing
'判断成功失败
If pan = true Then
Response.Write "邮件发送成功"
else
response.write "邮件发送失败"
end if
%>
1743
1791
1207
1390
1272
1350
832
1884
754
783
9169
5747
5263
4886
4324
4039
3165
3091
3084
3044