当前位置: 首页 > 图文教程 > 网络编程 > ASP > 查看服务器Application/Session变量工具

ASP
用asp执行DTC
利用ADODB.Stream使用浏览器下载服务器文件
应用数据库的唯一性约束并在asp中捕捉数据库的错误
用ASP编程控制在IIS建立Web站点
asp实现k线图(在线)
在ASP中用EasyMailObject组件处理Exchange邮件源代码(7)
在ASP中用EasyMailObject组件处理Exchange邮件源代码(6)
在ASP中用EasyMailObject组件处理Exchange邮件源代码(5)
在ASP中用EasyMailObject组件处理Exchange邮件源代码(4)
在ASP中用EasyMailObject组件处理Exchange邮件源代码(3)
在ASP中用EasyMailObject组件处理Exchange邮件源代码(2)
在ASP中用EasyMailObject组件处理Exchange邮件源代码(1)
用文本+ASP打造新闻发布系统。几点补充
用文本+ASP打造新闻发布系统(五)新闻修改
用文本+ASP打造新闻发布系统(四)新闻删除
用文本+ASP打造新闻发布系统(三)新闻列表显示
用文本+ASP打造新闻发布系统(二)新闻添加
ASP作的剪包锤游戏
ASP注册表项目修改
构建稳定的服务器端组件的七个步骤

ASP 中的 查看服务器Application/Session变量工具


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 105 ::
收藏到网摘: n/a

  <%@LANGUAGE="javascript" 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">&nbsp;变量</td>
            <td width="65%" class="TD1">&nbsp;值</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){
 &nbs