主题:这个问题是不是我的IIS中没有CDONTS组件?
veng
[专家分:0] 发布于 2007-02-01 14:48:00
错误类型:
Server 对象, ASP 0177 (0x800401F3)
无效的类别字符串
/13/EMAIL/sendmail.asp, 第 37 行
我37行代码是
Set email = Server.CreateObject("CDONTS.NewMail")
这个问题是不是我的IIS中没有CDONTS组件?
那么怎应该怎么办?
回复列表 (共1个回复)
沙发
longlong16 [专家分:10670] 发布于 2007-02-02 09:26:00
这是IIS自带的组件,IIS5.0以上版本都支持,是用来发邮件的,首先你在你的机器中设置SMTP服务,如果没有设置则出错!就在INTERNET管理器中设置。
然后就可以使用这个发送邮件了。给几函数如下,你对照下 自己有无写错:
<%
sub sendmail(fromwho,towho,subject,body)
dim cdo
set cdo=server.createobject("cdonts.newmail")
cdo.From=fromwho
cdo.To = towho
cdo.Subject =subject
cdo.Body =body
cdo.MailFormat=0
'说明是以MIME发送
cdo.BodyFormat=0
'可以包含html代码
cdo.Importance=0
'邮件的优先级别0-1-2
'cdo.cc=xx@xx.net 抄送
'cdo.Bcc=xx@sf.net密送
'cdo.AttachFile "" 附件
cdo.Send
Set cdo=Nothing
end sub
sub sendattachmail(fromwho,towho,subject,body,attachfile)
dim cdo
set cdo=server.createobject("cdonts.newmail")
cdo.From=fromwho
cdo.To = towho
cdo.Subject =subject
cdo.Body =body
cdo.MailFormat=0
cdo.BodyFormat=0
cdo.Importance=0
cdo.AttachFile attachfile
cdo.Send
Set cdo=Nothing
end sub
%>
我来回复