阿七
级别: 未验证会员
精华:
0
发帖: 909
威望: 0 点
金钱: 2161 RMB
贡献值: 0 点
在线时间:512(小时)
注册时间:2006-03-29
最后登录:2008-08-07
|
Asp遍历服务器对象的代码
一 遍历Request +v.<Fw2k#
方式1: j% `%
DQ
<% $A;%p6PO)
For Each r In Request.QueryString Dx5X6 t9=
Response.Write "Request("""&r&""") = " & Request(r) 4aGV IQ
Response.Write "<p>" Uk'bOp
Next P U2^4h/[`
%> _m. w5nJ
方式2: 11((b
<% "OO)m](w
For i = 1 To Request.QueryString.Count SYd6D@^2j
Response.Write "Request("""&Request.QueryString.Key(i)&""") = " & Request.QueryString(Request.QueryString.Key(i)) 8-PHW,1@a3
Response.Write "<p>" X=KC +1e
Next sx n{uRF
%> ~Jh1$O,9o
将QueryString改为Form，即可遍历Post变量。 x:6c @2
二 遍历Session b]b+PK*h
<% h 5Ee*D e
Session("key1")="value1" < 2SWfH1>
Session("key2")="value2" M5kw3Jy 5
For Each s In Session.Contents 1N} vz(0"
Response.Write "Session("""&s&""") = " & Session(s) 4q"4 N2
Response.Write "<p>" {SkE`u4Sz
Next E 1`TQA
%> G1fC'6$3
二 遍历Application j VPX]
8
<% al" =ld(
Application("key1")="value1" a*&( cn
Application("key2")="value2" {e5DQ 21.
For Each a In Application.Contents bd\%K`JQ{
Response.Write "Application("""&a&""") = " & Application(a) YsMM$rjP +
Response.Write "<p>" hv`I`[/J
Next 3$_JNF`
%>
|
|
|
|
[楼 主]
|
Posted: 2006-04-04 14:28 |
| |
常州五颜六色网络技术有限公司 -> 网站建设 -> Asp遍历服务器对象的代码
