日期:2009-05-25  浏览次数:20980 次

原来用cdonts组件来发邮件,自从服务器用了2003系统以后,发现原来的功能不灵了,页面提示说是创建对象不成功。于是我查了一下IIS的帮助,帮助里面明确的写着在2003系统中,cdonts的组件被删除了,只保留了cdo组件。CDO组件是cdonts的父级组件。但是网上很多地方说是用cdo组件发邮件的例子,其实都是cdonts组件的例子。
下面我来列一下cdo组件的例子
set cdomail=server.CreateObject ("CDO.Message") 这个是关键,创建的是cdo组件,而不是cdonts
'cdomail.MailFormat =0 这些属性在cdonts有,但是cdo中没有
'cdomail.BodyFormat =0
cdomail.From =mail
cdomail.To="jaa@aacom"
'cdomail.Bcc="sdfs@dfsdcom"
cdomail.Subject =product '" request information "
'//////////////////////////body content////////////////////////////
message="name:" & name & "<br>"
message=message & "company:" & company & "<br>"
'message=message & "单位地址:" & address & "<br>"
'message=message & "邮政编码:" & zip & "<br>"
message=message & "phone:" & phone & "<br>"
'message=message & "传真:" & fax & "<br>"
message=message & "request time:" & ordertime & "<br>"
message=message & "request information:" & info & "<br>"
'///////////////////////////////////////////////////
cdomail.htmlBody =message ‘这个也是关键的部分,和原来的body属性不一样
'response.Write product & "<br>"
'response.Write & "<br>"
'response.end
cdomail.Send
set cdomail=nothing