ASP发送E-MAIL

ASP发送E-MAIL

关键词：ASP, 组件Components

　 如 果 你 希 望 用 ASP 发 送 E-MAIL ， 你 需 要 安 装 一 个 A S P 部 件 。 有 几 种 第 三 方 厂 商 的 部 件 你 可 以 使 用 。 但 是 在 IIS4 下 ， 你 可 以 使 用 CDONTS 。
　 　 虽 然 名 字 奇 怪 ， 它 是 很 容 易 使 用 的 并 且 性 能 良 好 。 如 果 你 希 望 使 用 它 ， 请 跟 随 下 面 步 骤 。
　 　 1. 检 查 你 是 否 安 装 了 SMTP 服 务 。 OPTION PACK 缺 省 安 装 时 是 包 括 SMTP 服 务 的 。
　 　 SMTP 服 务 安 装 后 ， 在 你 的 system32 目 录 下 会 有 一 个 文 件 叫 CDONTS.DLL。
　 　 2. 你 可 以 用 下 面 的 简 单 脚 本 通 过 A S P 发 送 E-MAIL ：

　 　 <%
　 　 Dim MailObject
　 　 Set MailObject = Server.CreateObject("CDONTS.NewMail")

　 　 MailObject.Send "11830@email.com.cn","11830@email.com.cn","My subject","My text"
　 　 %>
　 　 是 不 是 很 简 单 ？

　 　 发 送 附 件
　 　 CDONTS 的 一 个 常 用 特 性 是 用 来 在 E-MAIL 中 发 送 附 件 。 代 码 也 不 难 写 。
　 　 <%
　 　 Dim MailObject
　 　 Set MailObject = Server.CreateObject("CDONTS.NewMail")

　 　 att_file="c:/attachments/StandardPolicy.txt"
　 　 f_name="Policy.txt"

　 　 MailObject.From="11830@email.com.cn"
　 　 MailObject.To="youremail@email.com.cn"

　 　 MailObject.Subject="Subject Text Here"
　 　 MailObject.Body="Body Text Here"
　 　 MailObject.AttachFile att_file,f_name

　 　 MailObject.Send
　 　 %>