跪求：遍历session对象代码

[creater]

<%
For Each item in request.ServerVariables
response.Write(item & "=" &request.Server Variables(item) & "<BR>")
Next
%>

上面这段代码可以遍历request对象，请问有没有办法遍历session对象啊??(asp、jsp都可)

[hbhbhbhbhb1021]

楼主分多啊
<%@ LANGUAGE=VBScript codepage ="936" %>
<% Option Explicit %>
您的sessionID号是：<%=session.sessionid%><br>
<%
Response.Write "在你的程序中一共使用了 " & Session.Contents.Count & _
" 个Session变量<P>"
Dim strName, iLoop
For Each strName in Session.Contents
'判断一个Session变量是否为数组
If IsArray(Session(strName)) then
'如果是数组，那么罗列出所有的数组元素内容
For iLoop = LBound(Session(strName)) to UBound(Session(strName))
Response.Write strName & "(" & iLoop & ") - " & _
Session(strName)(iLoop) & "<BR>"
Next
Else
'如果不是数组，那么直接显示
Response.Write strName & " - " & Session.Contents(strName) & "<BR>"
End If
Next
%>

[lstup]

session(i)

[themedy]

楼主分多，来接分得了

[myvicy]

<%@ LANGUAGE="VBSCRIPT" %>
<%
Dim sessitem
Dim anArray(2)
response.write "SessionID: " & Session.SessionID & "<P>"

anArray(0)="one"
anArray(1)="second"
anArray(2)="third"
Session("anArray")=anArray
Session("scalar")="1234567890ABCDEFG"

set objConn=server.createobject("adodb.connection")
set Session("object")=objConn

response.write "List of " & Session.Contents.Count & " items in Session
contents collection:<HR>"
For Each sessitem in Session.Contents
If IsObject(Session.Contents(sessitem)) Then
Response.write(sessitem & " : Session object cannot be displayed." & "<BR>")
Else
If IsArray(Session.Contents(sessitem)) Then
Response.write "Array named " & Session.Content(sessitem) & "<ol>"
For each objArray in Session.Contents(sessitem)
Response.write "<li>" & _
Session.Contents(sessitem)(objArray)& "<BR>"
Next
Response.write "</ol>"
Else
Response.write(sessitem & " : " & Session.Contents(sessitem) & "<BR>")
End If
End If
Next
%>

[wxf0104]

天外水火的方法很好的哟~~

学习

[wxf0104]

我会骗人的方法也不错，收藏~~

[creater]

当时注册这个ID的时候，过了大半年才收到，以前不用每天登录就可以加分的，到手上就已经积了几千分了，可且又很少提问，现在穷得只剩下分了，汗。。。。。。。。

[jFresH_MaN]

jsp的

for (Enumeration e = session.getAttributeNames(); e.hasMoreElements() ;) {
Object o=session.getAttribute((String)e.nextElement());
}

汗。。。
刚才在楼主的上一个帖子回复了
没想到刚写完，竟然揭贴了！！

[creater]

呵呵，本来想把这个也结了的：)

[jFresH_MaN]

web版抢分不容易啊！

[libaisongtuye]

分这么多，俺来接分

[creater]

hbhbhbhbhb1021(天外水火)
你的分单独给了哦!!!