ASP 发送电子邮件学习笔记

什么是ASP？

ASP（Active Server Pages）是一种基于服务器的脚本语言，用于创建动态网页。使用ASP技术可以实现与数据库交互、发送电子邮件等功能。

如何发送电子邮件？

在ASP中，可以使用CDONTS（Collaboration Data Objects for Windows NT Server）组件来发送电子邮件。

首先，需要创建CDONTS对象：

Copy Code
Set objCDONTS = Server.CreateObject("CDONTS.NewMail")

然后，设置邮件属性：

Copy Code
objCDONTS.To = "recipient@example.com"
objCDONTS.From = "sender@example.com"
objCDONTS.Subject = "邮件主题"
objCDONTS.Body = "邮件正文内容"

如果需要发送html格式的邮件，可以将邮件类型设置为html：

Copy Code
objCDONTS.BodyFormat = 0 ' 0表示普通文本，1表示html格式

还可以添加附件：

Copy Code
objCDONTS.AttachFile("c:\example\attachment.txt")

最后，发送邮件并释放对象：

Copy Code
objCDONTS.Send()
Set objCDONTS = Nothing

实例

以下是一个发送电子邮件的实例，其中包括了所有的属性和附件：

Copy Code
<%
' 创建CDONTS对象
Set objCDONTS = Server.CreateObject("CDONTS.NewMail")

' 设置邮件属性
objCDONTS.To = "recipient@example.com"
objCDONTS.From = "sender@example.com"
objCDONTS.Subject = "测试邮件"
objCDONTS.Body = "这是一封测试邮件。"

' 添加html格式的邮件内容
objCDONTS.BodyFormat = 1
objCDONTS.MailFormat = 0 ' 0表示MIME格式，1表示纯文本格式
objCDONTS.Importance = 1 ' 1表示紧急，3表示普通，5表示低
objCDONTS.Priority = 2 ' 1表示最高，2表示高，3表示低，4表示最低
objCDONTS.Headers("Content-Language") = "zh-cn"

' 添加附件
objCDONTS.AttachFile(Server.MapPath("attachment.txt"))

' 发送邮件
objCDONTS.Send()

' 释放对象
Set objCDONTS = Nothing
%>

以上就是ASP发送电子邮件的学习笔记及实例。