阿七
级别: 未验证会员
精华:
0
发帖: 909
威望: 0 点
金钱: 2161 RMB
贡献值: 0 点
在线时间:512(小时)
注册时间:2006-03-29
最后登录:2008-08-07
|
Asp遍历服务器对象的代码
一 遍历Request )4,U 方式1: H%}/O;C <% ['K}p24, For Each r In Request.QueryString )NqRu+j Response.Write "Request("""&r&""") = " & Request(r) O{U j Response.Write "<p>" a#9pN?~ Next (I+e@UUiL %> P>`|.@ 方式2: EP+LK?{% <%
8 tIy"5 For i = 1 To Request.QueryString.Count n@q-f-2 Response.Write "Request("""&Request.QueryString.Key(i)&""") = " & Request.QueryString(Request.QueryString.Key(i)) )me`Ud Response.Write "<p>" @*|T(068& Next *O_^C %> =(
[4pG 将QueryString改为Form,即可遍历Post变量。
H4sc7- 二 遍历Session #~.RJ% <% lJT"aXt'M Session("key1")="value1" Sn'
+~6i Session("key2")="value2" E\p"% For Each s In Session.Contents j5]ul!
ji Response.Write "Session("""&s&""") = " & Session(s) qL[SwEc Response.Write "<p>" $TK= :8HY Next tvq((2 %> N0JdU4' 二 遍历Application @g]EY&Uzl <% h ^s8LE3 Application("key1")="value1" 25@@-2h @ Application("key2")="value2" KeXt"U For Each a In Application.Contents Z_Y'#5o# Response.Write "Application("""&a&""") = " & Application(a)
D_)/.m Response.Write "<p>" y*v|q= Next ]]3rSXs2}J %>
|
|
[楼 主]
|
Posted: 2006-04-04 14:28 |
| |