注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

樱之花

叶散的时候,你明白欢聚;花谢的时候,你明白青春.

 
 
 

日志

 
 
关于我

分类中“我的实验室”是我在日常工作中的一些知识总结,有些写的比较匆忙,可能大家在阅读时会产生困扰,后期有时间我会重新整理编辑,谢谢大家的到访,您们的支持是我前进的动力!

网易考拉推荐

一个新的JMail(4.3版本)发送代码  

2009-08-15 12:53:30|  分类: ASP开发 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

一个新的JMail(4.3版本)发送代码

该段代码涉及到JMail v4.3的大部分常用方法。

包括邮件基本信息、身份验证、附件等。无需很多的修改就可以使用,也可以改成函数或过程。

<% 
Dim JMail, contentId 
Set JMail = Server.CreateObject("JMail.Message") 
JMail.Charset = "gb2312" ' 邮件字符集,默认为"US-ASCII" 
' JMail.ISOEncodeHeaders = False ' 是否进行ISO编码,默认为True 
' 发送者信息(可用变量方式赋值) 
JMail.From = "jiaz@21cn.com" ' 发送者地址 
JMail.FromName = "D.J." ' 发送者姓名 
JMail.Subject = "您在炫网资讯的歌词快递(请将编码设为简体中文(gb2312))" 
' 邮件主题 
' 身份验证 
JMail.MailServerUserName = "user" ' 身份验证的用户名 
JMail.MailServerPassword = "password" ' 身份验证的密码 
' 设置优先级,范围从1到5,越大的优先级越高,3为普通 
JMail.Priority = 3 
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR") 
' 加入一个收件人【变量email:收件人地址】可以同一语句重复加入多个 
JMail.AddRecipient(email) 
' 加入附件【变量filename:附件文件的绝对地址,确保用户IUSR_????有访问的权限】 
' 【参数设置是(True)否(False)为Inline方式】 
contentId = JMail.AddAttachment (filename, True) 
' 邮件主体(HTML(注意信件内链接附件的方式)) 
JMail.HTMLBody = "<html><head><META 
content=zh-cn 
http-equiv=Content-Language><meta 
http-equiv=""Content-Type"" content=""text/html; 
charset=gb2312"">
  <style type=text/css>A:link { FONT-SIZE: 9pt; 
TEXT-DECORATION: none; color: #000000}
A:visited {FONT-SIZE: 9pt; TEXT-DECORATION: 
none; color: #666666}A:hover {COLOR: #ff6600; 
FONT-SIZE: 9pt; TEXT-DECORATION: underline}
BODY {FONT-SIZE: 9pt} --></style></head>
  <body bgcolor=""#FFFFFF"" text=""#666666"" 
leftmargin=""0"" topmargin=""30"" 
link=""#FF9900"">
  <center>点击这里<a href=' cid:" & contentId 
& "' >
[附件文件]</a>将文件保存</center></body></html>" 
' 邮件主体(文本部分) 
JMail.Body = "我们的邮件采用了HTML格式,但是您的邮件查看软件可能不支持。您可以访问以下地址来查看:http://music.liuxuan.com" 
' 发送【调用格式:
objJMail.Send([username:
password@]SMTPServerAddress[:Port])】 
JMail.Send("user:password@smtp.21cn.com") 
' 关闭并清除对象 
JMail.Close() 
Set JMail = Nothing 
%>
http://www.yy0736.com/listpage.asp?t1=01&t2=07
  评论这张
 
阅读(451)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017