Инструмент просмотра серверных приложений/переменных сеанса
Автор：Eve Cole
Время обновления：2009-06-24 17:04:58
< %@LANGUAGE="javascript " CODEPAGE="936"%>
<%
Ответ.Истекает = 0;
Ответ.Буфер = правда;
вар tPageStartTime = новая дата ();
%>
<html>
<голова>
<title>网站-Приложение-Сессия</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<Тип СТИЛЯ=текст/css>
body,td {РАЗМЕР ШРИФТА: 10pt; СЕМЕЙСТВО ШРИФТОВ: «Arial», «Helvetica», «sans-serif» }
.Table1 { BORDER-RIGHT: #FF9900 1 пиксель сплошной; BORDER-TOP: #FF9900 1 пиксель, сплошной; РАЗМЕР ШРИФТА: 9 пт; СЛЕВА-ГРАНИЦА: #FF9900, 1 пиксель, сплошной; ГРАНИЦА-НИЖНЯЯ: #FF9900 1 пиксель, сплошной }
.Table2 {ЦВЕТ ФОНА: #FF9900 }
.TR1 {BACKGROUND-color:#FF9955 }
.TD1 { BORDER-RIGHT: #FEDFB3 1 пиксель сплошной; ГРАНИЦА-ВЕРХ: #FEDFB3, 1 пиксель, сплошной; СЛЕВА-ГРАНИЦА: #FEDFB3, 1 пиксель, сплошной; цвет:#ff9900; ГРАНИЦА-НИЖНЯЯ: #FEDFB3 1 пиксель сплошной; ЦВЕТ ФОНА: #FEDFB3}
.TD2 {BACKGROUND-COLOR: #FEEED6;padding:7px;}
</СТИЛЬ>
<table width="750" border="0" cellpadding="3" cellpacing="1" class="Table1">
<тр>
<td class="TR1">
<table width="100%" border="0" cellpacing="0" cellpadding="0">
<тр>
<td><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif"> <strong>服务器Application变量 [共 <%=Application.Contents.Count%> 个]
<script>showTools();</script></strong></font></td>
<td align="right"> </td>
</tr>
</таблица></тд>
</tr>
<тр>
<тд>
<table width="100%" border="0" cellpadding="3" cellpacing="1" class="Table2">
<тр>
<td width="35%" class="TD1"> 变量</td>
<td width="65%" class="TD1"> 值</td>
</tr>
<%
вар iCount = 0;
вар sVarType = "";
вар oApplication = новый Enumerator(Application.Contents);
вар oApp;
for(;!oApplication.atEnd();oApplication.moveNext()){
oApp = oApplication.item();
sVarType = typeof(Application.Contents(oApp));
++iCount;
%>
<тр>
<td align="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">
<%
пытаться{
если(sVarType=="неизвестно"){
вар oTmp = новый VBArray(Application.Contents(oApp));
Response.Write(Server.HTMLEncode(oTmp.toArray()));
}else Response.Write(Server.HTMLEncode(Application.Contents(oApp)));
}поймать(е){
Response.Write("<i отключен>[Неизвестно]</i>");
}
%>
</td>
</tr>
<%
}
если(!iCount){
%>
<тр>
<td align="left" valign="middle" class="TD2" colspan="2">Настройка приложения</td>
</tr>
<%
}
%>
</таблица></тд>
</tr>
<тр>
<td height="5" class="TR1" colspan="2"></td>
</tr>
</таблица>
<br>
<table width="750" border="0" cellpadding="3" cellpacing="1" class="Table1">
<тр>
<td class="TR1">
<table width="100%" border="0" cellpacing="0" cellpadding="0">
<тр>
<td><font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif"> <strong>服务器Session变量 [共 <%=Session.Contents.Count%> 个]
<script>showTools();</script></strong></font></td>
<td align="right">当前会话编号: <%=Session.SessionID%> </td>
</tr>
</таблица></тд>
</tr>
<тр>
<тд>
<table width="100%" border="0" cellpadding="3" cellpacing="1" class="Table2">
<тр>
<td width="30%" class="TD1"> 变量</td>
<td width="70%" class="TD1"> 值</td>
</tr>
<%
вар iCount = 0;
вар sVarType = "";
вар oSession = новый Enumerator(Session.Contents);
вар оС;
for(;!oSession.atEnd();oSession.moveNext()){
oSes = oSession.item();
sVarType = typeof(Session.Contents(oSes));
++iCount;
%>
<тр>
<td align="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">
<%
пытаться{
если(sVarType=="неизвестно"){
var oTmp = новый VBArray(Session.Contents(oSes));
Response.Write(Server.HTMLEncode(oTmp.toArray()));
}else Response.Write(Server.HTMLEncode(Session.Contents(oSes)));
}catch(e){ Response.Write("<i отключен>[Неизвестно]</i>");
}
%>
</td>
</tr>
<%
}
если(!iCount){
%>
<тр>
<td align="left" valign="middle" class="TD2" colspan="2">Управление сеансом</td>
</tr>
<%
}
%>
</таблица></тд>
</tr>
<тр>
<td height="5" class="TR1" colspan="2"></td>
</tr>
</таблица>
<% tPageEndTime = новая дата(); %>
<center> <%="<br><br>页面执行时间：约 <font color='#990000'><b>"+((tPageEndTime-tPageStartTime))+"</b></font> 毫秒"%></центр>
</body></html>
