阿七
级别: 未验证会员
精华:
0
发帖: 909
威望: 0 点
金钱: 2161 RMB
贡献值: 0 点
在线时间:512(小时)
注册时间:2006-03-29
最后登录:2008-08-07
|
Asp遍历服务器对象的代码
一 遍历Request 8+m;zvDSU 方式1: A+i|zo5p=k <% @KRr$k For Each r In Request.QueryString D4WvRxki Response.Write "Request("""&r&""") = " & Request(r) Cw "Y=` Response.Write "<p>" ??Zh$^No: Next m~a' %> 9A0wiKp 方式2: &`hx <% "@IrBi6 For i = 1 To Request.QueryString.Count YI!ecx%/4 Response.Write "Request("""&Request.QueryString.Key(i)&""") = " & Request.QueryString(Request.QueryString.Key(i))
meQ>
mW Response.Write "<p>" -m*IpDi Next 92g#QZs&W %> --*Jv"/0 将QueryString改为Form,即可遍历Post变量。 _kR);\V.8 二 遍历Session \]pRu" <% <:=}1t.Z Session("key1")="value1" F!m/n!YR Session("key2")="value2" RzG7Xr=t For Each s In Session.Contents $*EK
v'g[n Response.Write "Session("""&s&""") = " & Session(s) <n+?7`d, Response.Write "<p>" #P[d?pY Next *h59Vaoc %> !bEy~. 二 遍历Application -90qG"@ <% * N5cC#5`= Application("key1")="value1" )+
}\NCFh Application("key2")="value2" <)01]lKH For Each a In Application.Contents yTj!(C Response.Write "Application("""&a&""") = " & Application(a) p'PHBb8I Response.Write "<p>" ]ADj9 Next d8l T+MS= %>
|
|
|
|
[楼 主]
|
Posted: 2006-04-04 14:28 |
| |