<%
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]