轉自:http://www.piaoyi.org/asp/ASP-Jmail-163-email.html
飘易今天给某网站留言板写了个在线发送邮件的功能，采用Jmail+ASP+163的smtp邮件服务器构成。
其实Jmail发送邮件是一个非常重要的功能，在Email网络营销方面，利用Jmail群发邮件是一门必须掌握的技术。对于需要验证会员信息，定期给会员发送消息的网站来说，jmail实在是太重要了。 下面，飘易就结合ASP脚本来写一段JMAIL发送邮件的代码。 函数已经封装，可改写成php等其他脚本：<%
''=========利用Jmail在线发送邮件函数 start=============
Function sendjmail(t1,t2,t3)
't1:接收邮件地址 t2:接收邮件用户名 t3:邮件正文
dim jmail
set jmail=server.createobject("Jmail.message")
jmail.silent=true
jmail.charset="gb2312"
jmail.ContentType = "text/html" '发件人邮箱
jmail.from="flymorn_py@163.com"
'发件人名称
jmail.fromname="飘易博客"
'收件人邮箱,姓名
jmail.AddRecipient t1,t2
'邮件的紧急程度，1最快，5最慢
jmail.Priority=1
'发送邮件标题
jmail.subject="飘易博客(www.piaoyi.org):有人回复了您的评论~"
'指定别的回信地址
JMail.ReplyTo="flymorn_py@gmail.com" JMail.HTMLBody = "<html><head><meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312""><style type=text/css>A:link { FONT-SIZE: 9pt; TEXT-DECORATION: none; color: #000000}A:visited {FONT-SIZE: 9pt; TEXT-DECORATION: none; color: #666666}A:hover {COLOR: #ff6600; FONT-SIZE: 9pt; TEXT-DECORATION: underline}BODY {FONT-SIZE: 9pt} --></style></head><body><br>"&t3&"</body></html>" jmail.mailserverusername="flymorn_py" '邮件发送服务器登录名称
jmail.mailserverpassword="************" '邮件发送服务器登录密码
sendok=jmail.send("smtp.163.com") 'smtp服务器名称 if sendok then
response.write "恭喜您，"&t1&"邮件发送成功！"&NOW()
else
response.write "对不起，邮件发送失败，可能由于服务器登录设置不当或信息有误！"&NOW()
end if jmail.Close
set jmail=nothing
End Function
''=========利用Jmail在线发送邮件函数 end============= ''调用上面定义的函数发送邮件的方法
response.write sendjmail("23434667@qq.com","飘易","你好。这是邮件正文部分。")
%>
我们可以利用上面封装的函数来对网站的会员进行群发，定期发送邮件等。大家还可以参考下阿江写的一篇文字：一个使用JMAIL发信的例子。另外要注意的是 163邮箱并不是全部都开放了 smtp/pop3 权限，这里有一则网易的通知：
“亲爱的用户朋友：自2006年11月16日起，网易免费邮件系统的POP3及SMTP服务将暂停开通，此前已经开通POP3及SMTP服务的邮箱帐号则不受影响，仍然可以正常使用。对此如有任何疑问, 请通过网易在线客服提交你的问题。----网易邮件中心 2006年11月15日”
飘易使用的邮箱是2002年就注册并使用至今的，所以163的POP3及SMTP服务可以直接使用。
如果你注册的163邮箱的时间晚于 2006年11月16日，则默认不能开通pop3和smtp服务，但可以通过开通随身邮或其他增值服务来开通此项业务。
当然，也可以使用sohu或sina或yahoo的邮箱来使用smtp服务进行jmail的邮件发送。
关于gmail，为什么飘易没有使用gmail邮箱来作为Jmail的邮件发送服务器，原因是这样的：
GMAIL的SMTP端口号是465 or 587,POP3 995，还经过了 SSL加密。虽然Gmail和Google企业邮箱开放SMTP，地址为smtp.gmail.com，也支持outlook或foxmail收发邮件，但是却无法使用Jmail组件发信。Jmail的发信端口默认是25，Jmail并不支持 SSL连接方式，所以GMAIL是无法使用jmail组件发信的！这是飘易目前的理解。
''=========利用Jmail在线发送邮件函数 start=============
Function sendjmail(t1,t2,t3)
't1:接收邮件地址 t2:接收邮件用户名 t3:邮件正文
dim jmail
set jmail=server.createobject("Jmail.message")
jmail.silent=true
jmail.charset="gb2312"
jmail.ContentType = "text/html" '发件人邮箱
jmail.from="flymorn_py@163.com"
'发件人名称
jmail.fromname="飘易博客"
'收件人邮箱,姓名
jmail.AddRecipient t1,t2
'邮件的紧急程度，1最快，5最慢
jmail.Priority=1
'发送邮件标题
jmail.subject="飘易博客(www.piaoyi.org):有人回复了您的评论~"
'指定别的回信地址
JMail.ReplyTo="flymorn_py@gmail.com" JMail.HTMLBody = "<html><head><meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312""><style type=text/css>A:link { FONT-SIZE: 9pt; TEXT-DECORATION: none; color: #000000}A:visited {FONT-SIZE: 9pt; TEXT-DECORATION: none; color: #666666}A:hover {COLOR: #ff6600; FONT-SIZE: 9pt; TEXT-DECORATION: underline}BODY {FONT-SIZE: 9pt} --></style></head><body><br>"&t3&"</body></html>" jmail.mailserverusername="flymorn_py" '邮件发送服务器登录名称
jmail.mailserverpassword="************" '邮件发送服务器登录密码
sendok=jmail.send("smtp.163.com") 'smtp服务器名称 if sendok then
response.write "恭喜您，"&t1&"邮件发送成功！"&NOW()
else
response.write "对不起，邮件发送失败，可能由于服务器登录设置不当或信息有误！"&NOW()
end if jmail.Close
set jmail=nothing
End Function
''=========利用Jmail在线发送邮件函数 end============= ''调用上面定义的函数发送邮件的方法
response.write sendjmail("23434667@qq.com","飘易","你好。这是邮件正文部分。")
%>
如果您有其他的ASP+JMAIL+GMAIL的解决方法，欢迎您留下评论。
http://www.google.com.tw/search?q=jmail+ssl&hl=zh-TW&ei=KP4_TMBJjci9A77QscUM&start=10&sa=N