Jmail发邮件的例子
2018-09-05 23:40
在Asp程序中用Jmail发邮件的比较多，主要是因为多数虚拟主机支持他，其它的支持的较少。
下面是一个Jmail发邮件的例子代码：
如果您在自己的机器上试，请下载Jmail.dll，下载解压后，双击Setup.bat即可完成安装！
复制代码 代码如下:
<%
Onerrorresumenext
DimJMail,contentId
JMail.Charset=gb2312邮件字符集，默认为US-ASCII
JMail.ISOEncodeHeaders=False是否进行ISO编码，默认为True
发送者信息（可用变量方式赋值）
JMail.Subject=邮件主题邮件主题
身份验证
JMail.MailServerUserName=myusername身份验证的用户名
JMail.MailServerPassword=mypassword身份验证的密码
设置优先级，范围从1到5，越大的优先级越高，3为普通
JMail.Priority=3
JMail.AddHeaderOriginating-IP,Request.ServerVariables(REMOTE_ADDR)
加入一个收件人【变量email：收件人地址】可以同一语句重复加入多个
JMail.AddRecipient(xiaoz@xiaoz.com)
加入附件【变量filename：附件文件的绝对地址，确保用户IUSR_机器名有访问的权限】
【参数设置是(True)否(False)为Inline方式】
contentId=JMail.AddAttachment(Server.MapPath(jmail.asp),True)
邮件主体（HTML(注意信件内链接附件的方式)）
JMail.HTMLBody=<html><head><METAcontent=zh-cnhttp-equiv=Content-Language><metahttp-equiv=Content-Typecontent=text/html;charset=gb2312><styletype=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><fontcolor=red>邮件正文</font><br><fontcolor=green>邮件正文</font><br><b>邮件正文</b></body></html>
邮件主体（文本部分）
JMail.Body=我们的邮件采用了HTML格式，但是您的邮件查看软件可能不支持。。。邮件正文,邮件正文,邮件正文
发送【调用格式：objJMail.Send([username:password@]SMTPServerAddress[:Port])】
JMail.Send(smtp.163.com)
关闭并清除对象
JMail.Close()
SetJMail=Nothing
iferr.number<>0then
response.write发送发送失败！
else
response.write邮件发送成功！
endif
%>