|
|
| 监测你的站点使用多少session和application的程序 |
| 作者:不详 来源:不详 发布时间:2006-8-13 0:35:46 发布人:chinazhan |
减小字体
增大字体
<%@ Language=VBScript %> <% 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>" %> ------------------------------ 本站的检测结果: 在你的程序中一共使用了 3 个Session变量 在你的程序中一共使用了 4 个application变量 做人要厚道,请注明转自chinazhan中国站长(www.ChinaZhan.com)。
|
| |
|
[]
[返回上一页]
[打 印]
[收 藏] |
|
| ∷相关文章评论∷ (评论内容只代表网友观点,与本站立场无关!) [更多评论...] |
|
|