Asp遍历服务器对象的代码

一 遍历Request
方式1:
%
For Each r In Request.QueryString
 Response.Write "Request("""r""") = "  Request(r)
 Response.Write "p>"
Next
%>
方式2:
%
For i = 1 To Request.QueryString.Count
 Response.Write "Request("""Request.QueryString.Key(i)""") = "  Request.QueryString(Request.QueryString.Key(i))
 Response.Write "p>"
Next
%>
将QueryString改为Form，即可遍历Post变量。
二 遍历Session
%
Session("key1")="value1"
Session("key2")="value2"
For Each s In Session.Contents
 Response.Write "Session("""s""") = "  Session(s)
 Response.Write "p>"
Next
%>
三 遍历Application
%
Application("key1")="value1"
Application("key2")="value2"
For Each a In Application.Contents
 Response.Write "Application("""a""") = "  Application(a)
 Response.Write "p>"
Next
%>