Linux中国 Linux中国门户站!
设为主页 设为主页
收藏本站 收藏本站
 
当前位置 :首页 ->网络应用 ->邮件服务器 ->正文

用HTML格式发送邮件

来源:Linuxdby.com 作者:Webmaster 时间:2007-05-31 点击: [收藏] [投稿]
你可以通过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; "
"
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; ""

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


 如果您对本文有任何疑问或者建议,请到讨论区发表您的意见: >> 论坛入口 <<



上一篇:用Win2003架设邮件服务器   下一篇:Aspemail的安装及简单示例的说明

文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【我要投稿】 【论坛讨论
更多相关文章
Power by linux-cn.com 粤ICP备05006655号