cdo组件发邮件（2003操作系统的应用）

原来用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