cdo组件发邮件

80酷酷网    80kuku.com

  发邮件原来用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="jaaaacom"
'cdomail.Bcc="sdfsdfsdcom"
cdomail.Subject =product '" request information "
'//////////////////////////body content////////////////////////////
message="name:" & name & "
"
message=message & "company:" & company & "
"
'message=message & "单位地址:" & address & "
"
'message=message & "邮政编码:" & zip & "
"
message=message & "phone:" & phone & "
"
'message=message & "传真:" & fax & "
"
message=message & "request time:" & ordertime & "
"
message=message & "request information:" & info & "
"
'///////////////////////////////////////////////////
cdomail.htmlBody =message ‘这个也是关键的部分,和原来的body属性不一样
'response.Write product & "
"
'response.Write & "
"
'response.end
cdomail.Send
set cdomail=nothing

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: