檢視伺服器Application/Session變數工具
作者：Eve Cole
更新時間：2009-06-24 17:04:58
< %@LANGUAGE="javascript " CODEPAGE="936"%>
<%
響應.過期= 0;
響應.Buffer = true;
var tPageStartTime = new Date();
%>
<html>
<頭>
<title>網址-應用變數-會話變數</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<樣式類型=文字/css>
正文，td {字體大小：10pt；字型系列：「Arial」、「Helvetica」、「sans-serif」}
.Table1 { 右邊框：#FF9900 1px 實心；頂部邊框：#FF9900 1px 實心；字體大小：9pt；左邊框：#FF9900 1px 實心；邊框底部：#FF9900 1px 實心}
.Table2 { 背景顏色：#FF9900 }
.TR1 { 背景顏色:#FF9955 }
.TD1 { 右邊框：#FEDFB3 1px 實心；頂部邊框：#FEDFB3 1px 實心；左邊框：#FEDFB3 1px 實心；顏色：#ff9900；邊框底部：#FEDFB3 1px 實心；背景顏色：#FEDFB3}
.TD2 {背景顏色：#FEEED6;填滿：7px;}
</風格>
<table width="750" border="0" cellpadding="3" cellspacing="1" class="Table1">
<tr>
<td類別=“TR1”>
<表格寬度=“100%”邊框=“0”cellspacing=“0”cellpadding=“0”>
<tr>
<td><font color="#FFFFFF"face="Verdana, Arial, Helvetica, sans-serif"> <strong> 伺服器應用程式標記 [共 <%=Application.Contents.Count%> 個]
<script>showTools();</script></strong></font></td>
<td對齊=“右”> </td>
</tr>
</表></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellpadding="3" cellspacing="1" class="Table2">
<tr>
<td width="35%" class="TD1"> 變數</td>
<td width="65%" class="TD1">值</td>
</tr>
<%
var iCount = 0;
var sVarType = "";
var oApplication = new Enumerator(Application.Contents);
var oApp;
for(;!oApplication.atEnd();oApplication.moveNext()){
oApp = oApplication.item();
sVarType = typeof(Application.Contents(oApp));
++i計數；
%>
<tr>
<tdalign="left" valign="middle"class="TD2"><b><%=oApp%></b><br><i 已停用>[<%if(sVarType=="unknown") {Response.Write("Array");}else{Response.Write(sVarType);}%>]</i></td>
<td valign="middle" class="TD2">
<%
嘗試{
if(sVarType=="未知"){
var oTmp = new VBArray(Application.Contents(oApp));
Response.Write(Server.HTMLEncode(oTmp.toArray()));
}其他 Response.Write(Server.HTMLEncode(Application.Contents(oApp)));
}抓住（e）{
Response.Write("<i 已停用>[未知]</i>");
}
%>
</td>
</tr>
<%
}
如果（！iCount）{
%>
<tr>
<tdalign="left" valign="middle" class="TD2" colspan="2">沒有應用變數</td>
</tr>
<%
}
%>
</表></td>
</tr>
<tr>
<td height="5" class="TR1" colspan="2"></td>
</tr>
</表>
<br>
<table width="750" border="0" cellpadding="3" cellspacing="1" class="Table1">
<tr>
<td類別=“TR1”>
<表格寬度=“100%”邊框=“0”cellspacing=“0”cellpadding=“0”>
<tr>
<td><font color="#FFFFFF"face="Verdana, Arial, Helvetica, sans-serif"> <strong> 伺服器會話變數 [共 <%=Session.Contents.Count%> one]
<script>showTools();</script></strong></font></td>
<tdalign="right">目前會話編號：<%=Session.SessionID%> </td>
</tr>
</表></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellpadding="3" cellspacing="1" class="Table2">
<tr>
<td width="30%" class="TD1"> 變數</td>
<td width="70%" class="TD1">值</td>
</tr>
<%
var iCount = 0;
var sVarType = "";
var oSession = new Enumerator(Session.Contents);
var oses；
for(;!oSession.atEnd();oSession.moveNext()){
oSes = oSession.item();
sVarType = typeof(Session.Contents(oSes));
++i計數；
%>
<tr>
<tdalign="left" valign="middle"class="TD2"><b><%=oSes%></b><br><i 已停用>[<%if(sVarType=="unknown") {Response.Write("Array");}else{Response.Write(sVarType);}%>]</i></td>
<td valign="middle" class="TD2">
<%
嘗試{
if(sVarType=="未知"){
var oTmp = new VBArray(Session.Contents(oSes));
Response.Write(Server.HTMLEncode(oTmp.toArray()));
}其他 Response.Write(Server.HTMLEncode(Session.Contents(oSes)));
}catch(e){ Response.Write("<i 已停用>[未知]</i>");
}
%>
</td>
</tr>
<%
}
如果（！iCount）{
%>
<tr>
<tdalign="left" valign="middle" class="TD2" colspan="2">沒有會話變數</td>
</tr>
<%
}
%>
</表></td>
</tr>
<tr>
<td height="5" class="TR1" colspan="2"></td>
</tr>
</表>
<% tPageEndTime = new Date(); %>
<center> <%="<br><br>頁面執行時間：約<font color='#990000'><b>"+((tPageEndTime-tPageStartTime))+"</b></font>毫秒“%></中心>
</正文></html>
