如何用ASP发送html格式的邮件？

<%

Dim objMail

Set objMail = CreateObject("CDONTS.Newmail")

objMail.TO = "[email protected]"

objMail.From [email protected]

objmail.Subject = "闪亮日子之html撼雪喷云"

objMail.MailFormat = cdoMailFormatMime

objMail.bodyFormat = cdobodyFormathtml

objMail.body = "内容"

objMail.send

set objMail = Nothing

[1]