asp代码中定义的变量如何获取表单中文本框值的问题

wjy217213 2009-02-05 10:14:13
asp代码中定义的变量如何获取表单中文本框值的问题,我想实现如下功能不知道怎么办,请大家帮助我!
代码如下:
请输入邮箱地址: <form ><input name="Email" type="text" id="Email" size="30" /> <input type="button" value="点击发送邮件" > </form>
<%
Email=Request("Email")
%>
我的设计思路是,用户在文本框中输入邮箱地址,点击发送邮件按钮后,<%Email=Request("Email")%>,Email变量就能成功获取到表单中Email文本框值,现在的代码不能实现该功能,我不知道是不是Email=Request("Email")这样的赋值对不对,他们在一个网页里,请大家帮忙改进,谢谢大家了!
...全文
1068 21 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
21 条回复
切换为时间正序
请发表友善的回复…
发表回复
gjz_1209 2009-02-05
  • 打赏
  • 举报
回复
<form action="?" method="get">
<input name="Email" type="text" id="Email" size="30">
<input type="submit" value="点击发送邮件" >
</form>
<%
Email=Request("Email")
response.Write Email
%>
xiaojielanbaihe 2009-02-05
  • 打赏
  • 举报
回复
对啊对啊,就是form没有action
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
<%
Subject = "您的好友推荐您注册成为艺类网用户"
bodys = "您好艺类网!"
Conn.ExeCute("exec msdb.dbo.sp_send_dbmail @profile_name='con_service',@recipients='wjy217213@163.com',@subject='测试发邮件 sql查询',@body_format='HTML',@body='测试发邮件 sql查询';")
%>

如果这样写的话,wjy217213@163.com这个邮箱里能收到这个邮件,但是我想以变量形式获取到值,Email=Request("Email") ,......@recipients='Email'......
怎么做呀?
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
[Quote=引用 5 楼 bhd1896 的回复:]
<form action="?" method="get">
<input name="Email" type="text" id="Email" size="30">
<input type="submit" value="点击发送邮件" >
</form>
<%
Email=Request("Email")
response.Write Email
%>
[/Quote]

谢谢这样能获取到值了,但是我想做以下的代码:
<%
Email=Request("Email")
response.Write Email
Subject = "您的好友推荐您注册成为艺类网用户"
bodys = "您好,艺类网!"
Conn.ExeCute("exec msdb.dbo.sp_send_dbmail @profile_name='con_service',@recipients='Email',@subject='测试发邮件 sql查询',@body_format='HTML',@body='测试发邮件 sql查询';")
%>

在这个页面能显示出Email的值,但是我邮箱里接收不到邮件,为什么呀?
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
[Quote=引用 8 楼 lingyun410 的回复:]
1.如果点击新页面发送邮件,那么直接使用action
<form action="?menu=SendMail" method="post">
<input type="text" name="Email" id="Email" size="20" />
<input type="submit" value="点击发送邮件" />
</form>
<%
If LCase(Request("Menu"))="sendmail" Then
Dim Email
Email=Request("Email")
'发送邮件的代码
End If
%>
2.使用AJAX来异步发送邮件
<form action="" method="po…
[/Quote]

我就想在本页面发送怎么办呀?
lingyun410 2009-02-05
  • 打赏
  • 举报
回复
1.如果点击新页面发送邮件,那么直接使用action
<form action="?menu=SendMail" method="post">
<input type="text" name="Email" id="Email" size="20" />
<input type="submit" value="点击发送邮件" />
</form>
<%
If LCase(Request("Menu"))="sendmail" Then
Dim Email
Email=Request("Email")
'发送邮件的代码
End If
%>
2.使用AJAX来异步发送邮件
<form action="" method="post">
<input type="text" name="Email" id="Email" size="20" />
<input type="button" onclick="sendMail();" value="点击发送邮件" />
</form>
<script type="text/javascript">
<!--
function sendMail(){
//获取Email的值,然后处理
}
//-->
</script>
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 bhd1896 的回复:]
<form action="?" method="get">
<input name="Email" type="text" id="Email" size="30">
<input type="button" value="点击发送邮件" >
</form>
<%
Email=Request("Email")
response.Write Email
%>
[/Quote]
谢谢你的回复,我试了,输入邮箱,然后点击发送按钮后,页面没有变化,response.Write Email 应该显示出Email的值的呀?
ChinaXtHuLang 2009-02-05
  • 打赏
  • 举报
回复
<form action="?" method="get"> 
<input name="Email" type="text" id="Email" size="30">
<input type="submit" value="点击发送邮件" >
</form>
<%
Email=Request("Email")
response.Write Email
%>
bhd1896 2009-02-05
  • 打赏
  • 举报
回复
<form action="?" method="get">
<input name="Email" type="text" id="Email" size="30">
<input type="submit" value="点击发送邮件" >
</form>
<%
Email=Request("Email")
response.Write Email
%>
bhd1896 2009-02-05
  • 打赏
  • 举报
回复
<form action="?" method="get">
<input name="Email" type="text" id="Email" size="30">
<input type="button" value="点击发送邮件" >
</form>
<%
Email=Request("Email")
response.Write Email
%>
lanbo1213 2009-02-05
  • 打赏
  • 举报
回复
<%
Email=Request("Email")
%> 赋值是正确的。 但是你Email 得到的肯定是空值。
你要么用JS 要么就表单传递Email 值。
javaxi 2009-02-05
  • 打赏
  • 举报
回复
<form action="?act=send" >
<input name="Email" type="text" id="Email" size="30" /> <input type="submit" value="点击发送邮件" >
</form>

<%
if Request("act")= "send" then
Email=Request.form("Email")
end if
%>
javaxi 2009-02-05
  • 打赏
  • 举报
回复
Email=Request.form("Email")
应该是没错的, 建议检查有无重复的name.
还有... 你的form需要有action... <%%>asp的代码要判断action才执行赋值代码
  • 打赏
  • 举报
回复
Conn.ExeCute("exec msdb.dbo.sp_send_dbmail @profile_name='con_service',@recipients='Email',@subject='测试发邮件 sql查询',@body_format='HTML',@body='测试发邮件 sql查询';")

你变量这么写能对吗?
这全是字符了都
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
感觉你们帮助我,大家快乐才是真正的快乐!大家积极回帖,我明天结帖,人人都有分拿!
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
呵呵,搞定了,原来是改成@recipients='"&Email&"',这样就行了,呵呵,在SQL中单引是字符串啊
zhuyongzhao 2009-02-05
  • 打赏
  • 举报
回复
关注中
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
[Quote=引用 8 楼 lingyun410 的回复:]
1.如果点击新页面发送邮件,那么直接使用action
<form action="?menu=SendMail" method="post">
<input type="text" name="Email" id="Email" size="20" />
<input type="submit" value="点击发送邮件" />
</form>
<%
If LCase(Request("Menu"))="sendmail" Then
Dim Email
Email=Request("Email")
'发送邮件的代码
End If
%>
2.使用AJAX来异步发送邮件
<form action="" method="po…
[/Quote]

第二个方法肯定不行的,因为SQL2005的数据库邮件功能只能用于服务器端,不能用于JS里的
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
请输入邮箱地址 <form action="invite1.asp" method="post"><input name="Email" type="text" id="Email" size="30" maxlength="255" /> <input type="submit" value="点击发送邮件" > </form>

<%
Email=Request("Email")
response.Write Email
Subject = "您的好友推荐您注册成为艺类网用户"
bodys = "此邮件由艺类网系统自动发出!请勿直接回复!"
Conn.ExeCute("exec msdb.dbo.sp_send_dbmail @profile_name='con_service',@recipients='Email',@subject='测试发邮件 sql查询',@body_format='HTML',@body='测试发邮件 sql查询';")
%>

在本页面处理,但是和在另外一个页面的效果是一样的,
测试结果如下:
在inviste_do.asp页面显示wjy217213@163.com
但是wjy217213@163.com里却没有收到邮件
wjy217213 2009-02-05
  • 打赏
  • 举报
回复
我调整了一下思路做成表单提交页面inviste.asp和表单处理inviste_do.asp两个页面,
inviste.asp代码如下:
请输入邮箱地址 <form action="invite_do.asp" method="post"> <input name="Email" type="text" id="Email" size="30" maxlength="255" /> <input type="submit" value="点击发送邮件" ></form>

inviste_do.asp代码如下
<%
Email=Request("Email")
response.Write Email
Subject = "您的好友推荐您注册成为艺类网用户"
bodys = "此邮件由艺类网系统自动发出!请勿直接回复!"
Conn.ExeCute("exec msdb.dbo.sp_send_dbmail @profile_name='con_service',@recipients='Email',@subject='测试发邮件 sql查询',@body_format='HTML',@body='测试发邮件 sql查询';")
%>

测试结果如下:
在inviste_do.asp页面显示wjy217213@163.com
但是wjy217213@163.com里却没有收到邮件
加载更多回复(1)

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧