ASP内置了两种语法引擎,分别是VBScript和JScript。 VBScript是VB的一个子集。JScript和JavaScript有些类似。 如果你熟悉VB,建议用VBScript,否则推
顺晟科技
2019-08-16 15:31:00
327
< " CODEPAGE="936"% >
< %
Response.Expires = 0;
Response.Buffer = true;
var tPageStartTime = new Date();
% >
< html >
< head >
< title >网站-Application变量-Session变量< /title >
< meta http-equiv="Content-Type" content="text/html; charset=gb2312" >
< STYLE type=text/css >
body,td {FONT-SIZE: 10pt; FONT-FAMILY: "Arial", "Helvetica", "sans-serif" }
.Table1 { BORDER-RIGHT: #FF9900 1px solid; BORDER-TOP: #FF9900 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #FF9900 1px solid; BORDER-BOTTOM: #FF9900 1px solid }
.Table2 { BACKGROUND-COLOR: #FF9900 }
.TR1 { BACKGROUND-color:#FF9955 }
.TD1 { BORDER-RIGHT: #FEDFB3 1px solid; BORDER-TOP: #FEDFB3 1px solid; BORDER-LEFT: #FEDFB3 1px solid; color:#ff9900; BORDER-BOTTOM: #FEDFB3 1px solid; BACKGROUND-COLOR: #FEDFB3}
.TD2 {BACKGROUND-COLOR: #FEEED6;padding:7px;}
< /STYLE >
< table width="750" border="0" cellpadding="3" cellspacing="1" class="Table1" >
< tr >
< td class="TR1" >
< table width="100%" border="0" cellspacing="0" cellpadding="0" >
< tr >
< 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 >
< /table >< /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));
++iCount;
% >
< tr >
< td align="left" valign="middle" class="TD2" >< b >< %=oApp% >< /b >< br >< i disabled >[< %if(sVarType=="unknown") {Response.Write("Array");}else{Response.Write(sVarType);}% >]< /i >< /td >
< td valign="middle" class="TD2" >
< %
try{
if(sVarType=="unknown"){
var oTmp = new VBArray(Application.Contents(oApp));
Response.Write(Server.HTMLEncode(oTmp.toArray()));
}else Response.Write(Server.HTMLEncode(Application.Contents(oApp)));
}catch(e){
Response.Write("< i disabled >[Unknow]< /i >");
}
% >
< /td >
< /tr >
< %
}
if(!iCount){
% >
< tr >
< td align="left" valign="middle" class="TD2" colspan="2" >没有Application变量< /td >
< /tr >
< %
}
% >
< /table >< /td >
< /tr >
< tr >
< td height="5" class="TR1" colspan="2" >< /td >
< /tr >
< /table >
< br >
< table width="750" border="0" cellpadding="3" cellspacing="1" class="Table1" >
< tr >
< td class="TR1" >
< table width="100%" border="0" cellspacing="0" cellpadding="0" >
< tr >
< 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 >
< /table >< /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));
++iCount;
% >
< tr >
< td align="left" valign="middle" class="TD2" >< b >< %=oSes% >< /b >< br >< i disabled >[< %if(sVarType=="unknown") {Response.Write("Array");}else{Response.Write(sVarType);}% >]< /i >< /td >
< td valign="middle" class="TD2" >
< %
try{
if(sVarType=="unknown"){
var oTmp = new VBArray(Session.Contents(oSes));
Response.Write(Server.HTMLEncode(oTmp.toArray()));
}else Response.Write(Server.HTMLEncode(Session.Contents(oSes)));
}catch(e){ Response.Write("< i disabled >[Unknow]< /i >");
}
% >
< /td >
< /tr >
< %
}
if(!iCount){
% >
< tr >
< td align="left" valign="middle" class="TD2" colspan="2" >没有Session变量< /td >
< /tr >
< %
}
% >
< /table >< /td >
< /tr >
< tr >
< td height="5" class="TR1" colspan="2" >< /td >
< /tr >
< /table >
< % tPageEndTime = new Date(); % >
< center > < %="< br >< br >页面执行时间:约 < font color=\\\'#990000\\\' >< b >"+((tPageEndTime-tPageStartTime))+"< /b >< /font > 毫秒"% >< /center >
< /body >< /html >
06
2021-07
16
2019-08
16
2019-08
16
2019-08
16
2019-08
16
2019-08