一个用jmail发信的过程、源代码,及使用方法.
一个用jmail发信的过程,及使用方法. <br>
发信时,直接调用这个过程就行了。 <br>
<br>
<br>
<br>
dim str,HtmlBody <br>
HtmlBody="<br>
I Love 2Yup!<br>
<br>
" <br>
str=JmailSend( "hello","ILoveYou",true,HtmlBody,"youname@domain.com",youname@sina.com, <br>
"hello","smtp.sina.com.cn","hello","Password") <br>
<br>
if str="Y" then <br>
response.write("发送成功") <br>
else <br>
response.write("发送失败!请重试!") <br>
end if <br>
'================================================= <br>
'函数名:JmailSend <br>
'作 用:用Jmail发送邮件 <br>
'参 数:Subject 邮件标题 <br>
' Body 邮件内容 <br>
' Body 邮件内容 <br>
' isHtml 是否发送Html格式邮件 (true 是) <br>
' HtmlBody Html格式邮件内容 <br>
' MailTo 收件人Email <br>
' From 发件人Email <br>
' FromName 发件人姓名 <br>
' Smtp smtp服务器 <br>
' Username 邮箱用户名 <br>
' Password 邮箱密码 <br>
'返回值:JmailSend="N" 发送失败 JmailSend="Y" 发送成功 <br>
'~~~~~~~~~~suercool~~~~~ <br>
<br>
'================================================= <br>
<br>
function JmailSend(Subject,Body,isHtml,HtmlBody,MailTo,From,FromName,Smtp,Username,Password) <br>
dim JmailMsg <br>
set JmailMsg=server.createobject("jmail.message") <br>
JmailMsg.mailserverusername=Username <br>
JmailMsg.mailserverpassword=Password <br>
<br>
JmailMsg.addrecipient MailTo <br>
JmailMsg.from=From <br>
JmailMsg.fromname=FromName <br>
<br>
JmailMsg.charset="gb2312" <br>
JmailMsg.logging=true <br>
JmailMsg.silent=true <br>
<br>
JmailMsg.subject=Subject <br>
JmailMsg.body=Body <br>
if isHtml=true then JmailMsg.htmlbody=HtmlBody <br>
<br>
if not JmailMsg.send(Smtp) then <br>
JmailSend="N" <br>
else <br>
JmailSend="Y" <br>
end if <br>
JmailMsg.close <br>
set JmailMsg=nothing <br>
end function <br>
%> <br>
留言区(共0条)