用ASP发送HTML格式的邮件

March 25,2004

<%
Dim objMail
Set objMail = CreateObject("CDONTS.Newmail")
objMail.TO = "[email protected]"
objMail.From = "[email protected]" '在这里可以选择你要发送去那里的地址
objmail.Subject = "HTML EMAIL!"
objMail.MailFormat = cdoMailFormatMime
objMail.BodyFormat = cdoBodyFormatHTML
objMail.Body = "<html><body>Hey there!This is a html doc
in your Email!!!!  We kick the Llamas Ass!!!!</body></html>"
objMail.send
set objMail = Nothing
%>