标题:[求助]大家好!急切求助
取消只看楼主
yakey
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2007-9-27
 问题点数:0 回复次数:2 
[求助]大家好!急切求助

大家好呀,小女子初来乍到,有礼了。我是带着问题来的,请侠侠们帮帮我!
下面是做了一个直接提交到邮箱的表单的sent.asp。可是怎么也调试不出;帮忙诊断下吧,谢谢
<%
Dim idearmail, contentId
iname=Request("iname")
why=Request("why")
tel=Request("itel")
email=Request("iemail")
idear=Request("idear")
mailbody=""诉求类型:"&why&vbcrlf&"发件人:"&iname&vbcrlf&"我的邮箱:"&email&vbcrlf&"我的电话:"&tel&vbcrlf&"我的"&why&":"&idear"
Set idearmail = Server.CreateObject("JMail.Message")
idearmail.Charset = "gb2312"
idearmail.From =email
idearmail.FromName = iname
idearmail.Subject = "意见"
//idearmail.Subject = iname&"对***"why
idearmail.body=mailbody
idearmail.MailServerUserName = "asia"
idearmail.MailServerPassword = "7311"
idearmail.Priority = 3
idearmail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
idearmail.AddRecipient("***@hotmail.com")
isgo=idearmail.Send("用户名:密码@邮件服务器")
if isgo then
msg="提交成功!"
else
msg="发送失败!"
end if

idearmail.Close()
Set idearmail = Nothing

%>

搜索更多相关主题的帖子: Request why 
2007-09-27 11:06
yakey
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2007-9-27
得分:0 

已经研究过了,可还是不行。服务器上已经装了jmail了。我的这些语句好像有错误,可是自己找不到


2007-09-27 13:33
yakey
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2007-9-27
得分:0 
谢谢啊,太感谢了。我调的头都快破了~~还是提示错误。我再试试

2007-09-27 15:28



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-173255-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023926 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved