使用 CDOSYS 发送电子邮件

CDO (Collaboration Data Objects) 是一项微软的技术，设计目的是用来简化通信程序的创建。

CDOSYS 是 ASP 中的内置组件。我们会向您展示如何使用该组件来发送电子邮件。

CDONTs 怎么样？

微软已经在 Windows 2000、Windows XP 以及 Windows 2003 中淘汰了 CDONTs。如果您还在应用程序中使用 CDONTs，就需要更新代码，并使用新的 CDO 技术。

使用 CDOSYS 的实例

发送电子邮件：

<%

Set myMail=CreateObject("CDO.Message")

myMail.Subject="Sending email with CDO"

myMail.From="mymail@mydomain.com"

myMail.To="someone@somedomain.com"

myMail.TextBody="This is a message."

myMail.Send

set myMail=nothing

%>

发送带有 Bcc 和 CC 字段的文本邮件:

<%

Set myMail=CreateObject("CDO.Message")

myMail.Subject="Sending email with CDO"

myMail.From="mymail@mydomain.com"

myMail.To="someone@somedomain.com"

myMail.Bcc="someoneelse@somedomain.com"

myMail.Cc="someoneelse2@somedomain.com"

myMail.TextBody="This is a message."

myMail.Send

set myMail=nothing

%>

发送 HTML 邮件:

<%

Set myMail=CreateObject("CDO.Message")

myMail.Subject="Sending email with CDO"

myMail.From="mymail@mydomain.com"

myMail.To="someone@somedomain.com"

myMail.HTMLBody = "<h1>This is a message.</h1>"

myMail.Send

set myMail=nothing

%>

发送一封发送来自网站的网页的 HTML 邮件：

<%

Set myMail=CreateObject("CDO.Message")

myMail.Subject="Sending email with CDO"

myMail.From="mymail@mydomain.com"

myMail.To="someone@somedomain.com"

myMail.CreateMHTMLBody "http://www.w3school.com.cn/asp/"

myMail.Send

set myMail=nothing

%>

发送一封发送来自电脑中文件的网页的 HTML 邮件：

<%

Set myMail=CreateObject("CDO.Message")

myMail.Subject="Sending email with CDO"

myMail.From="mymail@mydomain.com"

myMail.To="someone@somedomain.com"

myMail.CreateMHTMLBody "file://c:/mydocuments/test.htm"

myMail.Send

set myMail=nothing

%>

发送一封带有附件的电子邮件：

<%

Set myMail=CreateObject("CDO.Message")

myMail.Subject="Sending email with CDO"

myMail.From="mymail@mydomain.com"

myMail.To="someone@somedomain.com"

myMail.TextBody="This is a message."

myMail.AddAttachment "c:\mydocuments\test.txt"

myMail.Send

set myMail=nothing

%>

使用远程服务器发送一封文本邮件：

<%

Set myMail=CreateObject("CDO.Message")

myMail.Subject="Sending email with CDO"

myMail.From="mymail@mydomain.com"

myMail.To="someone@somedomain.com"

myMail.TextBody="This is a message."

myMail.Configuration.Fields.Item _

("http://schemas.microsoft.com/cdo/configuration/sendusing")=2

'远程 SMTP 服务器的 IP 或名称

myMail.Configuration.Fields.Item _

("http://schemas.microsoft.com/cdo/configuration/smtpserver") _

="smtp.server.com"

'服务器端口

myMail.Configuration.Fields.Item _

("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _

=25

myMail.Configuration.Fields.Update

myMail.Send

set myMail=nothing

%>

最新文章

  1. 如何修复Windows 10 Enterprise 在9月更新后图片全部由绘图板打开的情况
  2. Qt 中使用Singleton模式需小心
  3. Python的平凡之路（20）
  4. 比较TFS与SVN，你必须知道的10点区别
  5. redis+Keepalived主从热备秒级切换
  6. 【Excel 4.0 函数】REGISTER 的两种形式以及VBA等效语句
  7. dede调用文章里的图片
  8. zedboard如何从PL端控制DDR读写(三)——AXI-FULL总线调试
  9. TCP HelloWord
  10. java 定义mysql树形菜单
  11. zeromq源码分析笔记之准备（0）
  12. css中em与px
  13. iOS开发针对SQL语句的封装
  14. Software Version --hdu1976
  15. 【剑指offer】打印单列表从尾部到头部
  16. 无法使用SQL login去登陆SQL Server - &#39;Password did not match&#39;
  17. JAVA_SE基础——28.封装
  18. Thread之十：停止线程方法汇总
  19. golang 关于 interface 的学习整理
  20. day9.初识函数

热门文章

  1. 九度OJ 1013：开门人和关门人 （排序）
  2. 连通性 保证f具有介值性质
  3. php总结7——文件函数库、序列化数据、文件包含
  4. LeetCode：矩形区域【223】
  5. 《程序员代码面试指南》第八章 数组和矩阵问题 数组的partition 调整
  6. BZOJ 3362 Navigation Nightmare
  7. SDUT OJ类型转换函数的应用
  8. 51nod 1537
  9. win下发现两个有用的快捷键
  10. ZOJ 3329 One Person Game：期望dp【关于一个点成环——分离系数】