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

<%

Dim objMail

Set objMail = CreateObject("CDONTS.Newmail")

objMail.TO = "sunchunliang@263.net"

objMail.From =shenzhaoyang@intels.net

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

objMail.MailFormat = cdoMailFormatMime

objMail.bodyFormat = cdobodyFormathtml

objMail.body = "内容"

objMail.send

set objMail = Nothing

[1]