关于ASP实现发送Email问题救各位大侠
请问各位大侠PWS是否支持CDONTS.NewMail
发送email 的代码如下：
<%
toemail=request.form("toemail")
subject=request.form("subject")
content=request.form("content")
message=""
if toemail<>"" and subject<>"" and content<>"" then
set eso=server.createobject("CDONTS.NewMail")
eso.From="test@163.com"
eso.To=toemail
eso.Subject=subject
eso.Body=content
eso.Send
set eso=Nothing
message="<font color='#ff0000'>发送成功！</font>"
end if
错误提示如下：
服务器对象 错误 'ASP 0177 : 800401f3'
Server.CreateObject 失败
/test2/test1.asp, 行8
800401f3
问题点数：0、回复次数：7Top
1 楼andy2001p（火星）回复于 2003-12-02 16:56:29 得分 0
不支持，建议用Jmail组件!Top
2 楼hulihudu（糊里糊涂）回复于 2003-12-02 17:05:07 得分 0
请问Jmail组件支持WIN98吗？在WIN98的安装盘里有吗？如果没有可不可以从网上下载一个Top
3 楼nbstoneboy（stoneboy）回复于 2003-12-02 17:18:28 得分 0
关注！Top
4 楼hulihudu（糊里糊涂）回复于 2003-12-02 17:25:25 得分 0
请大家帮帮忙，我不想再安装一个操作系统了，有没有办法可以安装上那个组件Top
5 楼nbstoneboy（stoneboy）回复于 2003-12-02 17:39:55 得分 0
你可以到
http://down.tyfo.com/down/soft/pc/net/email/web/ihtml/2001-08-03/20010803,094102,3787.shtml
下载jmial。然后安装一下就可以了
安装好了以后你可以测试一下，我试过可以的
<%
Dim Jmail
Set Jmail=server.createobject("Jmail.Message")
Jmail.Charset = "gb2312"
Jmail.Silent = true
Jmail.Priority = 3
Jmail.MailServerUserName = "xxx@abc.com" (这里换成您的SMTP验证帐号)
Jmail.MailServerPassword = "********" （这里填写您的SMTP认证密码）
Jmail.From = "xyz@xyz.com" （发信人邮件地址）
Jmail.FromName = "发信人姓名"
Jmail.Subject = "信件主题"
Jmail.AddRecipient "xxx@abc.com" (收信人地址)
Jmail.Body = mailbody Mailbody参数是信件正文
Jmail.Send("mail.abc.com") (这里填写发件服务器，如mail.china-data.com，需要与SMTP验证信息对应)
Set Jmail=nothing
%>
组件注册regsvr32 jmail.dll
希望对你有帮助。
Top
6 楼hulihudu（糊里糊涂）回复于 2003-12-03 09:18:28 得分 0
谢谢大家Top
7 楼xinyaoxp（云枫）回复于 2003-12-10 09:36:54 得分 0
关注Top
