asp 读取通过表单发送的post数据_应用技巧

学习ASP，最重要的就是要掌握ASP内置的六大对象。事实上，在上一讲中，我们已经了解了Response对象，及Response对象中最常用的Write方法、Redirect方法和Expires属性。看到对象、方法、属性、集合、事件这些概念（俺一个都不识！），如果以前没接触过，聪明的您就不要管这些概念了，知道怎么用就行了，我的观点是刚开始关键在于临摹。下面我们继续通过实例学习Request对象，为了加深理解，务请运行这些程序看看输出结果。

一、 使用Request.ServerVariables获取环境变量，这部分内容很简单，但获取的内容却很重要，如何获取？请看下例：

复制代码 代码如下:

<%@ Language=VBScript %>
<HTML><BODY>
<% 'wuf8.asp
Response.Write "运行ASP文件的路径: " &_
Request.ServerVariables("Script_Name") & "<Br>"
Response.Write "返回content的数据长度: " &_
Request.ServerVariables("Content_Length") & "<Br>"
Response.Write "返回客户的IP地址: " &_
Request.ServerVariables("Remote_Addr") & "<Br>"
Response.Write "浏览器名: " &_
Request.ServerVariables("HTTP_USER_AGENT") & "<Br>"
Response.Write "返回主页实际物理路径: " &_
Request.ServerVariables("APPL_PHYSICAL_PATH") & "<Br>"
%>
<table colspan=8 cellpadding=5 border=0>
<tr>
<td align=CENTER bgcolor="#800000" width="109"> <font style="ARIAL NARROW" color="#ffffff" size="2">环境变量名</font></td>
<td align=CENTER width=459 bgcolor="#800000"> <font style="ARIAL NARROW" color="#ffffff" size="2">内容</font></td>
</tr>
<tr>
<td bgcolor="f7efde" align=CENTER> <font style="ARIAL NARROW" size="2">
result1
</font></td>
<td bgcolor="f7efde" align=CENTER> <font style="ARIAL NARROW" size="2">
result2
</font></td></tr>
</table>
</BODY></HTML>

Now，你应该发现上一讲中的例程wuf2.asp原来是多么的easy！
注意：该程序的后面一部分HTML标记纯是为下面的例子作准备的，所以不要觉得奇怪。那么，还有哪些环境变量呢？运行下面的例子就知道了（本程序删除了部分代码，最好去我站点下载源程序便于理解）。

复制代码 代码如下:

<%@ Language=VBScript %>
<% ‘wuf9.asp
Option Explicit
Dim Sv
%>
<HTML><BODY>
<table colspan=8 cellpadding=5 border=0>
<tr>
<td align=CENTER bgcolor="#800000" width="109"> <font style="ARIAL NARROW" color="#ffffff" size="2">环境变量名</font></td>
<td align=CENTER width=459 bgcolor="#800000"> <font style="ARIAL NARROW" color="#ffffff" size="2">结果</font></td>
</tr>
<%
for each Sv In Request.ServerVariables
Response.Write "<tr>"
Response.Write "<td bgcolor='f7efde' align=CENTER> <font style='ARIAL NARROW' size='2'>"
Response.Write Sv
Response.Write "</font></td>"
Response.Write "<td bgcolor='f7efde' align=CENTER> <font style='ARIAL NARROW' size='2'>"
Response.Write Request.ServerVariables(Sv)
Response.Write "</font></td></tr>"
next
%>
</table>
</BODY></HTML>

这里使用了For…Each循环，用来列举一个集合中的所有元素。如果后半部分看不懂，请对照wuf8.asp，再瞧瞧运行结果，仔细体会一下（什么态度？）。

二、 通过表单向服务器传送数据（也可这样理解，服务器端如何读取客户端发送的数据）
做过主页，应该知道很多主页通常都使用Form表单让用户输入数据，然后通过“submit（提交）”按钮发送数据。From表单中的“method”有两种主要方法：POST和GET，而“action”后一般都是指定一个.cgi、.pl或.asp文件，今天我们要学习的就是如果编写这个.asp文件。
（一） 如果使用POST方法传送数据，则用Request.Form来读取数据。
先编辑如下一个wuf10.htm文件，供用户输入数据：

复制代码 代码如下:

<html>
<body bgcolor="#FFFFFF">
<form method="post" action="wuf11.asp">
姓名： <input type="text" name="yourname"><br>
性别： <select name="gender">
<option>男</option>
<option>女</option>
</select> <br>
留言： <textarea name="message">您好！
注意多行文本的处理</textarea> <br>
爱好（按住Ctrl键可多选）：
<select name="hobby" multiple size="4">
<option>电脑</option>
<option>购物</option>
<option>电影</option>
<option>读书</option>
</select> <br>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="Reset">
</form>
</body>
</html>

再编写一个wuf10.htm需用到的文件wuf11.asp收集数据：

复制代码 代码如下:

<%@ Language=VBScript %>
<% 'wuf11.asp
Option Explicit
Response.Expires=0
Dim StrName, StrGender, StrM, StrMsg
StrName = Trim(Request.Form("yourname")) 'Trim函数用来除首尾空格
StrGender = Trim(Request.Form("gender"))
StrM = Trim(Request.Form("message"))
StrMsg = Replace(StrM,vbcrlf,"<Br>" & vbcrlf)
' vbcrlf相当于回车符和换行符的组合。至于Replace函数,其作用就是将字符串StrM中的vbcrlf替换为"<Br>" & vbcrlf（请思考这个vbcrlf有什么用？查看输出文件的HTML源码就明白了），详细请参考VBScript帮助。
%>
<HTML><BODY>
姓名: <%= StrName%><Br><Br>
性别: <%= StrGender%><Br><Br>
留言: <Br><Br>
<%= StrM%><Br><Br>
<%= StrMsg%><Br><Br>
实际上, "提交"按钮的值也被传递: <Br>
<%= Request.Form("Submit")%><Br><Br>
<% '先把上面看懂, 有兴趣再看看如何读取多个选项
Response.Write "共选择爱好项数:" & Request.Form("hobby").Count & "<Br>"
Dim I
For I = 1 to Request.Form("hobby").Count
Response.Write Request.Form("hobby")(I) & "<Br>"
Next
%>
</BODY></HTML>

在这个的例子中，为了便于理解，我们使用了两个程序，实际上只使用一个程序也可以，如果有兴趣请看下面的例程wuf12.asp，有助于加深对环境变量的理解。

复制代码 代码如下:

<%@ Language=VBScript %>
<% 'wuf12.asp
Option Explicit
Response.Expires=0
Dim StrName, StrGender, StrM, StrMsg
If Request.ServerVariables("Content_Length") <> 0 Then
'提交数据后,这个长度就不会是 0, 因此执行下面的语句, 将结果显示出来
'下面一部分实际上是照搬 wuf11.asp
StrName = Trim(Request.Form("yourname"))
StrGender = Trim(Request.Form("gender"))
StrM = Trim(Request.Form("message"))
StrMsg = Replace(StrM,vbcrlf,"<Br>" & vbcrlf)
%>
<HTML><BODY>
姓名: <%= StrName%><Br><Br>
性别: <%= StrGender%><Br><Br>
留言: <Br><Br>
<%= StrM%><Br><Br>
<%= StrMsg%><Br><Br>
<%
Response.Write "共选择爱好项数:" & Request.Form("hobby").Count & "<Br>"
Dim I
For I = 1 to Request.Form("hobby").Count
Response.Write Request.Form("hobby")(I) & "<Br>"
Next
%>
</BODY></HTML>
<%
Else
'当第一次加载页面时,没有提交任何数据,故前面一部分并不执行,而是从这里开始
'这也就是为什么会有两对 <HTML></HTML> 的原因
'下面照搬 wuf10.htm 就行了
'<form method="post" action="wuf11.asp"> 给用环境变量替换掉了, 其实完全一样
Response.Write "看看结果: " & Request.ServerVariables("Script_name") & "<Br>"
%>
<HTML><BODY>
<form method="post" action="<%= Request.ServerVariables("Script_name")%>">
姓名： <input type="text" name="yourname"><br>
性别： <select name="gender">
<option>男</option>
<option>女</option>
</select> <br>
留言： <textarea name="message">您好！
注意多行文本的处理</textarea> <br>
爱好（按住Ctrl键可多选）：
<select name="hobby" multiple size="4">
<option>电脑</option>
<option>购物</option>
<option>电影</option>
<option>读书</option>
</select> <br>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="Reset">
</form>
</BODY></HTML>
<%End If%>
（二）如果使用GET方法传送数据，则用Request.Querystring来读取数据。
先编辑如下一个wuf13.htm文件，供用户输入数据：
<html>
<body bgcolor="#FFFFFF">
<form method="get" action="wuf14.asp">
英文姓名： <input type="text" name="Ename"> <br>
中文姓名： <input type="text" name="Cname"><br>
性别： <select name="gender">
<option>男</option>
<option>女</option>
</select> <br>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="Reset">
</form>
</body>
</html>
再编写一个wuf13.htm需用到的文件wuf14.asp收集数据：
<%@ Language=VBScript %>
<% 'wuf14.asp
Option Explicit
Response.Expires=0
Dim StrCname, StrEname, StrGender
StrEname = Trim(Request.QueryString("Ename")) 'Trim函数用来除首尾空格
StrCname = Trim(Request.QueryString("Cname"))
StrGender = Trim(Request.QueryString("gender"))
%>
<HTML><BODY>
英文姓名: <%= StrEname%><Br><Br>
中文姓名: <%= StrCname%><Br><Br>
性别: <%= StrGender%><Br><Br>
看看提交的字符串: <Br>
<%= Request.ServerVariables("Query_String")%>
</BODY></HTML>

为了更好地理解这个程序，你最好先在浏览器中试试例程wuf13.htm的效果，看看输出的结果，你会发现地址栏中长长的字符串似曾相识，如同在Yahoo搜索时看到的差不多。这时，你试着在地址栏中直接输入“http://localhost/wuf14.asp?Ename=Rose&Cname=李二&gender=女”，居然也得到了同样的结果。所以你可以这样看，wuf13.htm的结果就是得到了类似这样的一个带参数的链接。而Request.QueryString则是从http:// 地址的附加参数中读取各个数据。

实际上，当按“提交”按钮后，查询字符串（输入的数据）会以参数的形式附加到URL地址后（各参数间以“&”分隔），达到传递数据的目的。同时，注意浏览器中显示的查询字符串中没有中文，而是不认识的含百分号的乱码，这是因为进行了编码的缘故。最后，与前面一样，这两个程序也可合并为一个程序（例程wuf15.asp,需去我站点下载）。
几点说明：
1． 若使用POST方法提交数据，则Request.ServerVariables("Content_Length")>0。
若使用GET方法提交数据，则Request.ServerVariables("Query_String") <> ""。
2． 弄懂原理后，你完全可以在同一个ASP文件中混合使用Request.Form和Request.QueryString。
3． 如果在一个Form表单中，有几个按钮，你如何确定用户按了哪个按钮？如果留意的话，会发现例程wuf11.asp中有一句，“提交”按钮的值也被传送，而wuf13.htm中生成的查询字符串最后也可以找到类似的值。请注意：只有被按按钮的值被传送，而其他按钮的值为””，这就是判断依据（《中计报》InfoWeb网站有一篇类似文章）。

时间： 2024-10-25 06:41:34

asp 读取通过表单发送的post数据_应用技巧的相关文章

asp 读取通过表单发送的post数据

学习ASP,最重要的就是要掌握ASP内置的六大对象.事实上,在上一讲中,我们已经了解了Response对象,及Response对象中最常用的Write方法.Redirect方法和Expires属性.看到对象.方法.属性.集合.事件这些概念(俺一个都不识!),如果以前没接触过,聪明的您就不要管这些概念了,知道怎么用就行了,我的观点是刚开始关键在于临摹.下面我们继续通过实例学习Request对象,为了加深理解,务请运行这些程序看看输出结果. 一. 使用Request.ServerVariables获

Asp.net Socket客户端(远程发送和接收数据)_实用技巧

复制代码 代码如下: /*************************************** * 对象名称: SocketObj * 功能说明: 远程发送与接收 * 试用示例: * using EC; //引用空间名 * string url = "218.75.111.74"; // URL也可以是(http://www.baidu.com/)这种形式 * int port = 8000; //端口 * string SendStr = "domainname\n

取得表单提交的所有数据_应用技巧

复制代码 代码如下: <% For Each x In Request.Form %> Request.Form( <%= x %> ) = <%= Request.Form(x) %> <BR> <% Next %> 或 <% For i = 1 To Request.Form("inputname").Count   Response.Write Request.Form("inputname")

asp教程中get post提交表单有5点区别_应用技巧

asp教程中get post提交表单区别有以下5点 Get和Post方式的区别有5点 1. get是从服务器上获取数据,post是向服务器传送数据. 2. get是把参数数据队列加到提交表单的ACTION属性所指的URL中,值和表单内各个字段一一对应,在URL中可以看到.post是通过HTTP post机制,将表单内各个字段与其内容放置在HTML HEADER内一起传送到ACTION属性所指的URL地址.用户看不到这个过程. 3. 对于get方式,服务器端用Request.QueryString

ASP.NET中Form表单不可以嵌套使用_实用技巧

我非常确定在ASP 中是可以有多个form 表单的,以前常常这样干的,在后台分类管理页面中,把添加和修改放在同一个页面,这样就需要用到两个 form 表单进行提交服务器代码处理. 经过测试,在ASP.NET 也是可以一个页面有多个form 表单的,例如下面的代码: <form id="form1"></form><form id="form2"></form><form id="form3"&

在Asp程序中取得表单所有内容的代码_应用技巧

在Asp中如何得到所有表单的名称跟对应的值.其实,这个问题很简单,但是可能还是有很多人不知道该怎么做,所以特地写下来,仅供参考.在Asp程序中,用来获得客户端数据的对象是 Request,这个对象给我们提供了很多的方法以及属性.比如,有这样一个Form, <FORM METHOD=POST name=cqq ACTION=""> <INPUT TYPE="text" NAME="username"> <INPUT T

jquery提交表单mvc3后台处理示例_实用技巧

JQuery提交表单 复制代码 代码如下: $(document).ready(function () {           $("#btnLogin").click(function () {               $.ajax({                   url: '/Home/Login',                   data: '{ "account":"' + $("#account").val(

Asp.net XMLHTTP封装类(GET,Post发送和接收数据)_实用技巧

复制代码 代码如下: /**************************************************************** * 函数名称:SendCommand(SendMethod method, ST_Param p) * 功能说明:向远程发送URL和参数,接受返回信息(无乱码); * 参 数:method:xml发送方法,POST/Get 两种 P:参数结构体 public string Url; //远程URL public string Parameter

JScript中遍历Request表单参数集合的方法_应用技巧

JScript下有一个Enumerator对象可以遍历集合.根据它的文档写了以下程序,可以遍历整个Request.QueryString集合: 复制代码 代码如下: var params = new Enumerator(Request.QueryString); while (!params.atEnd()) { Response.Write(params.item() + ":" + Request.QueryString(params.item()) + "<br