开发学院WEB开发ASP 页面之间传递元素的办法 阅读

页面之间传递元素的办法

 2001-02-09 10:16:36 来源:WEB开发网   
核心提示:在第三方页面传递参数这个思路倒是的确可以省下一些代码,至少我以前是从没这样子传过,页面之间传递元素的办法,<%'Pass form objects submitted by a form G' ETIf Request.QueryString.Count>0 ThenQStr="?
在第三方页面传递参数这个思路倒是的确可以省下一些代码,至少我以前是从没这样子传过。
<%
  'Pass form objects submitted by a form G
  '   ET
  If Request.QueryString.Count>0 Then
  QStr="?"
  For Each x In Request.QueryString
  QStr = QStr & x & "="  'Write Name of Parameter
  QStr = QStr & Server.URLEncode(request.QueryString(x)) & "&" 'Write value of parameter
  Next
  QStrSz = len(QStr)-1
  QStr = LEFT(QStr,QStrSz)
  else
  QStr=""
  End If
  Response.Redirect("YourURL.asp" & QStr)
  %>
  The Next example shows how To build the submitted parameters from a form POST. The PRocedure reads all posted objects and builds a querystring parameter.
  <%
  'Pass form objects submitted by a form G
  '   ET
  If Request.form.Count>0 Then
  QStr="?"
  For Each x In Request.form
  QStr = QStr & x & "="  'Write Name of Parameter
  QStr = QStr & Server.URLEncode(request.form(x)) & "&" 'Write value of parameter
  Next
  QStrSz = len(QStr)-1
  QStr = LEFT(QStr,QStrSz)
  else
  QStr=""
  End If
  Response.Redirect("YourURL.asp" & QStr)
  %>
  The Next code example may be used as a test ASP page To redirect to. It reads the querystring and builds a table to display the parameter name and value passed.
  <%@ Language=VBScript %>
  <HTML>
  <BODY>
  <%
  Response.Write "<TABLE BORDER=1><TR><TH>Parameter</TH><TH>Value</TH></TR>"
  For Each x In Request.QueryString
  Response.write "<TR><TD>" & x & "</TD><TD>" 'Write Name of Parameter
  Response.write Request.QueryString(x) & "</TD></TR>" 'Write value of parameter
  Next
  Response.Write "</TABLE>"
  %>
  </BODY>
  </HTML>
当然,上面这个东西的改进版本就简洁多了,再看这个
<%
If
Request.QueryString.Count > 0 Then
 
Response.Redirect("YourURL.asp?" &
Request.QueryString
Else
 If
Request.Form.Count > 0 Then
  
Response.Redirect("YourURL.asp?" &
Request.Form)
 Else
  
Response.Write("No Data Sent")
 End
If
End If
%>
原来可以整个抓取的,我也是刚刚知道,不敢独吞,拿出来共享


Tags:页面 之间 传递

编辑录入:爽爽 [复制链接] [打 印]
[]
  • 好
  • 好的评价 如果觉得好,就请您
      0%(0)
  • 差
  • 差的评价 如果觉得差,就请您
      0%(0)
赞助商链接