<% 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 Response.Write "在你的程序中一共使用了 " & application.Contents.Count & _ " 个application变量<P>" %>
罗列全部session和application
最新推荐文章于 2022-06-08 18:22:50 发布