Jmail发信的实例,模块化随时调用
时间:2007-09-27 13:35:00
一个用asp来处理jmail发信的过程,及使用方法.
发信时,直接调用这个过程就行了,很方便。
<%
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@domain.com",youname@sina.com,
"hello","smtp.sina.com.cn","hello","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
%>
标签:jmail,发信,模块
0
投稿
猜你喜欢
不要跳转或刷新 实现网页区域选择显示
2010-07-02 16:25:00
css+JavaScript实现PDF、ZIP、DOC链接的标注
2007-05-11 17:03:00
详解php如何合并身份证正反面图片为一张图片
2023-05-22 10:44:46
如何让IIS支持wap,让ASP生成wml
2008-05-18 13:42:00
FSO中的SubFolders 属性介绍
2008-01-05 13:57:00
CSS模块化设计
2009-01-05 12:10:00
如何在Frontpage中定义CSS样式
2008-08-02 12:32:00
我们需要的是怎样的分页?
2007-09-28 20:24:00
ASP连接MSSQL2005 数据库
2009-03-08 19:20:00
15个梦幻的登录页面设计展示
2009-07-19 14:17:00
CSS应用的必要步骤:样式重设
2008-06-11 13:29:00
细化解析:SQL Server 2005 数据库镜像
2009-01-23 13:41:00
SQL语句练习实例之一——找出最近的两次晋升日期与工资额
2011-10-24 20:16:42
给textarea增加长度限制的几种方法
2009-06-04 12:27:00
获取Dom元素的X/Y坐标
2009-10-10 12:49:00
asp中记录集对象的getrows和getstring用法分析
2012-11-30 20:09:49
asp对象之:基于adodb.stream的文件操作类
2008-06-07 08:38:00
FrontPage XP设计教程4——Css样式表的应用
2008-10-11 12:25:00
你是真正的用户体验设计者吗? Ⅱ
2008-03-21 12:30:00
aspjpeg 添加水印教程及生成缩略图教程
2011-04-04 11:04:00