阿七
级别: 未验证会员
精华:
0
发帖: 909
威望: 0 点
金钱: 2161 RMB
贡献值: 0 点
在线时间:512(小时)
注册时间:2006-03-29
最后登录:2008-08-07
|
Asp遍历服务器对象的代码
一 遍历Request dEJqgp}\p
方式1: ;bE/(nz M
<% PR@6=[|d
For Each r In Request.QueryString ai_ve[A
Response.Write "Request("""&r&""") = " & Request(r) ;ek*2Lh
Response.Write "<p>" +HS]kF H
Next J~2SGXH)^?
%> f7x2"&?vg
方式2: OXEEpoU?V
<% Gm|-[iUTG]
For i = 1 To Request.QueryString.Count Y*NzY*V\
Response.Write "Request("""&Request.QueryString.Key(i)&""") = " & Request.QueryString(Request.QueryString.Key(i)) } k2 Q
Response.Write "<p>" Pu3oQD ldV
Next )pHtsd. eP
%> |n 26[=\B
将QueryString改为Form，即可遍历Post变量。 sSW'SE?,<
二 遍历Session 1@|+l!rYF
<% (GC]=
Session("key1")="value1" @"7S$@cO
Session("key2")="value2" u}5CzV `
For Each s In Session.Contents {:1j>4m 2
Response.Write "Session("""&s&""") = " & Session(s) 1wR[nBg*|
Response.Write "<p>" ~+Gh{,f
Next }Fjbj5w0
%> fmW{c mr|
二 遍历Application *{ rorir
<% <X)\P}"L4
Application("key1")="value1" jYp!?%!
Application("key2")="value2" ]E/
0iM5
For Each a In Application.Contents &aRL}#U
Response.Write "Application("""&a&""") = " & Application(a) vJ&_-CX
Response.Write "<p>" 8US#SI'x
Next eh9 ?GUr5
%>
|
|
|
|
[楼 主]
|
Posted: 2006-04-04 14:28 |
| |
常州五颜六色网络技术有限公司 -> 网站建设 -> Asp遍历服务器对象的代码
