阿七
级别: 未验证会员
精华:
0
发帖: 909
威望: 0 点
金钱: 2161 RMB
贡献值: 0 点
在线时间:512(小时)
注册时间:2006-03-29
最后登录:2008-08-07
|
Asp遍历服务器对象的代码
一 遍历Request #9F=+[L 方式1: g0:mm,t\ <% yCwBZ/C For Each r In Request.QueryString )}0(7z
Yu Response.Write "Request("""&r&""") = " & Request(r) ypSW 9n Response.Write "<p>" WV]Si2pOZ Next BA4qQCS;5 %> }Dc0 Y 方式2: Fo|6 PoSo <% KB0HM For i = 1 To Request.QueryString.Count S zR7:U Response.Write "Request("""&Request.QueryString.Key(i)&""") = " & Request.QueryString(Request.QueryString.Key(i)) w+)MrB-} Response.Write "<p>" 6",S$3q Next $!h21 %> ae`*0wbv 将QueryString改为Form,即可遍历Post变量。
_z4c7_H3 二 遍历Session
yr9%,wwN <% ~Gx"gK0 Session("key1")="value1" hK5BOq!y Session("key2")="value2" se(ZiyHp For Each s In Session.Contents 1S/KT4 Response.Write "Session("""&s&""") = " & Session(s) u/-u
l Response.Write "<p>" `irz'/"p Next owM3Gz%?UA %> Y3KKskhLx 二 遍历Application E&ou(Q={ <% r%QTUuRXC3 Application("key1")="value1" \0?^%CD+@ Application("key2")="value2" f86h"#4 For Each a In Application.Contents 5$9g4 Response.Write "Application("""&a&""") = " & Application(a) d~n|F|`: Response.Write "<p>" E:'TZ4Z Next N.
R,[K %>
|
|
[楼 主]
|
Posted: 2006-04-04 14:28 |
| |