2.8w+
社区成员
- 主页
...全文
请发表友善的回复…
发表回复
速马 2003-09-27
自己的服务器上跑的程序,应该可以
不过我也不知道怎么弄
像hillhero789(丘)说得那种方法当然可以
不过我也不知道怎么弄
像hillhero789(丘)说得那种方法当然可以
lcmhl1 2003-09-27
列个SESSIONID是可以的，但是把SESSION的内容全部列出来做不到，要不然用SESSION的网站不是通通给你破解了
hillhero789 2003-09-27
可以的
你可以用个application
然后在global.asa里边写session得on_start，和on_end事件就行了
on_start就把session往application里添加
on_end就把session往application里边删除
你可以用个application
然后在global.asa里边写session得on_start，和on_end事件就行了
on_start就把session往application里添加
on_end就把session往application里边删除
itcoco 2003-09-27
mark
study
study
lcmhl1 2003-09-27
你有什么企图，SESSION让你列出来了那MICROSOFT可以关门了
kaxi 2003-09-27
这个不管用的 只能取得当前用户使用的SESSION 不能取得服务器上所有用户的SESSION
源码专家 2003-09-27
<%@ 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
%>
<% 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
%>
bineon 2003-09-27
你是不是想统计所有在线用户？
用session("user")统计，你希望能得到所有的在线用户，但是这是不可能的！
如果你想统计，可以在用户登陆的时候把相关信息写入online的表里面。那么遍历这个表就得到所有在线的人
用session("user")统计，你希望能得到所有的在线用户，但是这是不可能的！
如果你想统计，可以在用户登陆的时候把相关信息写入online的表里面。那么遍历这个表就得到所有在线的人
zhangshengjinggg 2003-09-27
不知道,帮你顶,我也想知道