|
|
主题: ASP 在线发信系统的问题
|
卡天禾
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2002/6/26 10:56:29
|
#12002/7/3 10:27:27
我在本地电脑测试在线发信系统，
提示为：
网页无法显示
HTTP错误 500.100-内部服务器错误-ASP错误
Internet信息服务
错误类型：
Server对象，ASP 0177 (0X800401F3)
无效的类别字符串
电脑为XP系统，IIS为5.1版本
请问该版本中，是否附带自动发信功能的ASP组件，
如果有，该组件的名称是什么？该如何调用？代码是什么？
|
=ridincal=
职务：管理员
等级：7
金币：20.0
发贴：5886
注册：2004/1/13 11:47:04
|
#22002/7/3 12:24:15
置顶的贴子有jmail 的使用
|
yufang
职务：普通成员
等级：1
金币：0.0
发贴：108
注册：2002/1/12 15:08:06
|
#32002/7/3 19:01:15
给你个我用的，自己去改 <% str = ""&_ vbNewline&""&_ vbNewline&""&_ vbNewline&" "&_ vbNewline&" "&_ vbNewline&" "&_ vbNewline&" 骗你的"&_ vbNewline&""&_ vbNewline&""&_ vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&request.form("name")&_
vbNewline&" 小姐，这张相片像你吗？"&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" 姓名： | "&_
vbNewline&" "&_
vbNewline&request.form("name")&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" 性别： | "&_
vbNewline&" "&_
vbNewline&request.form("sex")&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" 身高： | "&_
vbNewline&" "&_
vbNewline&request.form("gao")&_
vbNewline&" CM | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" 体重： | "&_
vbNewline&" "&_
vbNewline&request.form("zhong")&_
vbNewline&" KG | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" 出生年月： | "&_
vbNewline&" "&_
vbNewline&request.form("year")&_
vbNewline&" 年"&_
vbNewline&request.form("yue")&_
vbNewline&" 月"&_
vbNewline&request.form("date")&_
vbNewline&" 日"&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" 爱好： | "&_
vbNewline&" "&_
vbNewline&request.form("ai")&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" | "&_
vbNewline&" "&_
vbNewline&" "&_
vbNewline&" "&_ vbNewline&" "&_ vbNewline&" " set objMail = Server.CreateObject("CDONTS.NewMail") objMail.from = "nxii@hotmail.com" objMail.To = "nxii@monline.com.cn" ----------------------------用变量的话不要"" objMail.Subject = request.form("name") objMail.BodyFormat=0 objMail.MailFormat=0 objMail.Body=str objmail.send set objmail = nothing Response.Write "成功发送邮件!内容如下:" %> <%=str%>
编辑历史:[这消息被yufang编辑过(编辑时间2002-07-03 19:02:52)]
[这消息被yufang编辑过(编辑时间2002-07-04 22:22:17)]
|
卡天禾
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2002/6/26 10:56:29
|
#42002/7/4 12:54:00
为什么告诉我，是骗我的呢？  
|
wuqiong
职务：普通成员
等级：1
金币：1.0
发贴：223
注册：2001/2/23 8:00:32
|
#52002/7/4 14:37:58
可以用 CDONTS.NewMail ( IIS自带的虚拟SMTP ) 来实现，很简单
|
卡天禾
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2002/6/26 10:56:29
|
#62002/7/5 9:36:02
呵呵！谢谢楼上的朋友，可是，俺 比较菜，能告诉我具体的设置办法吗？
|
缺缺
职务：管理员
等级：8
金币：41.0
发贴：9620
注册：2004/1/14 19:14:47
|
|
