这个功能要装上WINDOWS NT OPTON PACK 的SMTP SERVICE。

首先

Set mail = Server.CreateObject("CDONTS.NewMail")以呼叫SMTP Service的元件，然后设定：

mail.To = "收件者E-Mail地址"

mail.From = "寄件者的E-Mail地址"

mail.Subject = "主旨"

mail.Body = "E-mail内文"

最后Mail.Send即开始发送邮件。

例如：

<%

Set mail = Server.CreateObject("CDONTS.NewMail")

mail.TO = "abc@xxx.com"

mail.From = "yourmail@xxx.com"

mail.Subject = "主题"

mail.Body = "E-Mail内容"

mail.Send

%>

一切OK了！哈哈，高兴吧！