你可以通过SMTP服务或者MS Exchange发送HTML格式的邮件,但是,你需要注意的是,并不是所有的clients都可以正常显示。在通常的情况下,CDONTS发送邮件是使用plain-text格式。在使用HTML方式的时候我们可以进行更多的设置,例如不同的字体,颜色,插入图片等等。下面是一个例子 <% Dim objMail Set objMail = Server.CreateObject("CDONTS.NewMail") '//these are all the images that are in this message. '//you must include them like this. '//please note that you DO NOT have TO write the '//entire file path in the tag in the body after this. '//make sure you see the image name after the path separated by a comma objMail.AttachURL "D:imagesmyImage.gif", "myImage.gif" objMail.AttachURL "D:imagesmyImage2.gif", "myImage2.gif"
HTML = HTML %26amp; "" HTML = HTML %26amp; "" HTML = HTML %26amp; "Send Mail with HTML" HTML = HTML %26amp; "" HTML = HTML %26amp; "" HTML = HTML %26amp; "" HTML = HTML %26amp; "" HTML = HTML %26amp; now() %26amp; " - " HTML = HTML %26amp; "These are all great ASP Sites | " HTML = HTML %26amp; "" HTML = HTML %26amp; "" HTML = HTML %26amp; "![]()
" HTML = HTML %26amp; "" HTML = HTML %26amp; "![]()
" HTML = HTML %26amp; " |
" HTML = HTML %26amp; "" HTML = HTML %26amp; "" objMail.From = "rob@tconsult.com" objMail.Subject = "Your daily HTML Mail" 'you need TO add these lines FOR the mail 'to be sent in HTML format objMail.BodyFormat = 0 objMail.MailFormat = 0
objMail.To = "you@yourhouse.com objMail.Body = HTML objMail.Send Response.write("Mail was Sent") set objMail = nothing %>
|