用ASP发送HTML格式的邮件

发表于:2007-06-30来源:作者:点击数: 标签:
% Dim objMail Set objMail = CreateObject(CDONTS.Newmail) objMail.TO = bhumphre@confederationc.on.ca objMail.From = Whoeveryouw ant @whereever.com @#在这里可以选择你要发送去那里的地址 objmail.Subject = HTML EMAIL! objMail.MailFormat = cdoMai
<%
Dim objMail
Set objMail = CreateObject("CDONTS.Newmail")
objMail.TO = "bhumphre@confederationc.on.ca"
objMail.From = "Whoeveryouwant@whereever.com" @#在这里可以选择你要发送去那里的地址
objmail.Subject = "HTML EMAIL!"
objMail.MailFormat = cdoMailFormatMime
objMail.BodyFormat = cdoBodyFormatHTML
objMail.Body = "<html><body><p align=@#center@#><b>Hey there!</b></p><p align=@#center@#><b>This is a html doc
in your Email!!!!</b></p><p align=@#center@#>&nbsp;</p><p align=@#center@#>&nbsp;</p><p
align=@#center@#><i><u>We kick the Llamas Ass!!!!</u></i></p></body></html>"
objMail.send
set objMail = Nothing
%>

原文转自:http://www.ltesting.net