专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅

首页 »Asp教程 » jmail在线发信:Jmail发信的实例,模块化便于调用 »正文

jmail在线发信:Jmail发信的实例,模块化便于调用

来源: 发布时间:星期四, 2009年2月12日 浏览:209次 评论:0


发信时直接这个过程就行了 


CODE:  [Copy to clipboard] 



<% 
dim str,HtmlBody 
HtmlBody="<html><body bgcolor=’red’ topmargin=’40’><p align=’center’>I Love 2Yup!</p></html>" 
str=JmailSend( "hello","ILoveYou",true,HtmlBody,"youname@do.com",[email protected]
"hello","smtp.sina.com.cn","hello","Password") 

 str="Y" then 
response.write("发送成功") 
 
response.write("发送失败!请重试!") 
end  

名: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 
 JmailMsg=server.createobject("jmail.message") 
JmailMsg.mailserverusername=Username 
JmailMsg.mailserverpassword=Password 

JmailMsg.addrecipient MailTo 
JmailMsg.from=From 
JmailMsg.fromname=FromName 

JmailMsg.char="gb2312" 
JmailMsg.logging=true 
JmailMsg.silent=true 

JmailMsg.subject=Subject 
JmailMsg.body=Body 
 isHtml=true then JmailMsg.htmlbody=HtmlBody 

 not JmailMsg.send(Smtp) then 
JmailSend="N" 
 
JmailSend="Y" 
end  
JmailMsg.close 
 JmailMsg=nothing 
end function 
%> 
0

相关文章

读者评论

发表评论

  • 昵称:
  • 内容: