【标题】：jmail代码
【关键字】：jmail
【来源】：http://blog.chinaunix.net/article.php?articleId=58306&blogId=11770

jmail代码

<%
dim CLStr,msg,mailserver,username,password,receive
CLStr=Chr(13) & Chr(10)

'请在此修改相关信息
mailserver="smtp.163.com"    '邮局服务器地址（smtp服务器地址）
username="zff5813ff@163.com"        'smtp服务器验证登陆名（邮局中开设的任何一个信箱的地址）
password="123456"     'smtp服务器验证密码（信箱密码）
receive="zengff@163.com"              '接受反馈信息的email地址（可以是您的任何有效信箱）
'修改结束

Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = username
msg.MailServerPassword = password
msg.From = username
msg.FromName = username
msg.AddRecipient (receive)
msg.Subject = Request.Form("subject")

msg.Body = "网站在线反馈"&CLStr&CLStr
msg.Body = msg.Body&"对方姓名:"&Request.Form("name")&CLStr
msg.Body = msg.Body&"对方信箱:"&Request.Form("email")&CLStr
msg.Body = msg.Body&"留言内容:"&Request.Form("body")&CLStr

msg.Send (mailserver)
msg.close
set msg = nothing
%>

<p>邮件发送成功，谢谢使用</p>

</BODY>
</HTML>

创建企业级Internet邮件服务器：【上一篇】
outlookup常见错误：【下一篇】

【相关文章】

使用jmail发送带有附件的mail，如何去除乱码