模板
教程
环境
性能
功能
管理
一个用jmail发信的过程，及使用方法.使用时直接调用就行
发表于：2007-06-30来源：作者：点击数：
标签：
一个用jmail发信的过程，及使用方法. 发信时，直接调用这个过程就行了。 % dim str,HtmlBody HtmlBody=htmlbody bgcolor=@#red@# topmargin=@#40@#p align=@#center@#I Love 2Yup!/p/html str=JmailSend( 2yup,ILoveYou,true,HtmlBody,2yup@2yup.com,suercool
一个用jmail发信的过程，及使用方法.
发信时，直接调用这个过程就行了。
<%
dim str,HtmlBody
HtmlBody="<html><body bgcolor=@#red@# topmargin=@#40@#><p align=@#center@#>I Love 2Yup!</p></html>"
str=JmailSend( "2yup","ILoveYou",true,HtmlBody,"2yup@2yup.com","suercool@sina.com","suercool","smtp.sina.com.cn","suercool","Password")
if str="Y" then
response.write("发送成功")
else
response.write("发送失败!请重试!")
end if
@#=================================================
@#函数名：JmailSend
@#作 用：用Jmail发送邮件
@#参 数：Subject 邮件标题
@# Body 邮件内容
@# Body 邮件内容
@# isHtml 是否发送Html格式邮件 (true 是)
@# HtmlBody Html格式邮件内容
@# MailTo 收件人Email
@# From 发件人Email
@# FromName 发件人姓名
@# Smtp smtp服务器
@# Username 邮箱用户名
@# Password 邮箱密码
@#返回值：JmailSend="N" 发送失败 JmailSend="Y" 发送成功
@#~~~~~~~~~~suercool~~~~~
@#=================================================
function JmailSend(Subject,Body,isHtml,HtmlBody,MailTo,From,FromName,Smtp,Username,Password)
dim JmailMsg
set JmailMsg=server.createobject("jmail.message")
JmailMsg.mailserverusername=Username
JmailMsg.mailserverpassword=Password
JmailMsg.addrecipient MailTo
JmailMsg.from=From
JmailMsg.fromname=FromName
JmailMsg.charset="gb2312"
JmailMsg.logging=true
JmailMsg.silent=true
JmailMsg.subject=Subject
JmailMsg.body=Body
if isHtml=true then JmailMsg.htmlbody=HtmlBody
if not JmailMsg.send(Smtp) then
JmailSend="N"
else
JmailSend="Y"
end if
JmailMsg.close
set JmailMsg=nothing
end function
%>
