快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

WINDOWS 2003下不注册组件用ASP发邮件

其实ASP可以做很多事,只是大家不知道怎么用而以。微软为asp提供了异常多的现成有用的组件,而这些组件却没有人知道,如用CDO.Message发送邮件。

什么是CDO.Message?在winnt和win2k下发送邮件要用CDONTS.NewMail,CDONTS.NewMail组件是需要注册的,很简朴,只要在服务器上运行命令行regsvr32 Cdonts.dll,在弹出的对话框中确定即可,使用CDONTS.NewMail服务还需安装有iis自带的smtp。到了windows2003,系统就没有附带Cdonts.dll文件了,只剩下一个类似的文件cdosys.dll,当然这个文件在win2k也是有的(需要注册组件),不过2003下好的是什么呢?该组件无需手动注册,系统已经自动注册了。现在我们来看看如何使用该组件吧。

<%
Dim cm
Set cm=Server.CreateObject("CDO.Message")
\\\'创建对象
cm.From="from@test.com"
\\\'设置发信人的邮箱
cm.To="to@test.com"
\\\'设置收信人的邮箱
cm.Subject="我发现一个可以在线订阅RSS的网站,以后不用再安装什么软件了。"
\\\'设定邮件的主题
\\\'cm.TextBody="http://www.4ico.com/rss/"
\\\'上面是使用普通的文本格式发送邮件,只能是文字,不能支持html,所以这里不用

cm.HtmlBody="Online RSS Feeds Reader 是一个在线的RSS新闻阅读系统。"&_
"无需下载安装,只要注册了之后你就可以拥有和软件相同强盛功能的RSS在线订阅聚合新闻的系统了。"&_
"不管你在任何地方,只要你能上网,你就能阅读你喜欢的订阅。"&_
"快去注册吧:<a href=http://www.4ico.com/rss/>http://www.4ico.com/rss/</a>"

\\\'上面就是你构建的html正文,这样发出的邮件就比只有文字的好看多了。不要说你不会html吧

\\\'cm.AddAttachment Server.MapPath("test.zip")
\\\'假如有需要发送附件的话就用上面的方式把文件附加进去。

cm.Send
\\\'最后当然是执行发送了
Set cm=Nothing
\\\'发送成功后即时释放对象

Response.Write("发送邮件成功。")
%>
返回类别: 教程
上一教程: ASP+SQL SERVER之图象数据处理
下一教程: 判定文章中文字符数量

您可以阅读与"WINDOWS 2003下不注册组件用ASP发邮件"相关的教程:
· 简朴快捷实现ASP在线发邮件
· 在ASP中用EASYMAILOBJECT组件处理EXCHANGE邮件源代码-读取邮件主题和大小
· 简朴快捷实现ASP在线发邮件功能
· 在WINDOWS 2003 SERVER中编写ASP代码需要注重的地方
· 实现ASP文件在线发邮件
    微笑服务 优质保证 索取样品