一个用jmail发信的过程，及使用方法.使用时直接调用就行

作者:佚名来源:一亩三分地点击: 日期:2007-03-28

一个用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
%>

【文章评论】【收藏本文】【推荐好友】【打印本文】【论坛讨论】

·ASP中巧用Response属性	·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式	·连接数据库查询手册（不仅仅适用于asp）
·警惕"给你的FileSystemObject对象加把锁"	·用ASP做全文检索

文章评论:(条)

请留名：匿名评论点击查看所有评论网管论坛

责任编辑:一分声明：刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。

关于我们 - 管理团队 - 网站历史 - 联系我们 - 广告服务 - 法律声明 - 网站地图 - RSS订阅 - 返回顶部

Power by DedeCms

一个用jmail发信的过程，及使用方法.使用时直接调用就行

作者:佚名 来源:一亩三分地 点击: 日期:2007-03-28

作者:佚名来源:一亩三分地点击: 日期:2007-03-28