首 页 | 精品电影 | 音乐天堂 | 在线游戏 | Flash MTV | 三湘书屋 | 幽默笑话 | 三湘图库 | 美女写真 | IT知识库 | QQ贴图 | 加入书签

网页制作网络编程图形图象操作系统冲浪宝典软件教学网络安全认证考试通信技术电子商务业内动态书籍教程原码

最近更新 文章分类 多媒体类 精品软件

本站搜索:
您的位置:三湘时空 -> IT知识库 -> 文章分类 -> ASP技巧 -> 查看服务器Application/Session变量工具  
查看服务器Application/Session变量工具


文章类别:ASP技巧 来源: 作者: 发表日期:2005-10-4 字体:[ ]

小游戏 | 在线影院 | 幽默笑话 | 源码下载 | Flash MTV | 音乐试听 | 书屋 | 美女写真

<%@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){
    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">当前会话编号:&nbsp;<%=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">&nbsp;变量</td>
            <td width="70%" class="TD1">&nbsp;值</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>
上一篇:十二招Windows操作系统的网络管理技巧 下一篇:在ASP中,用JScript脚本实现分页的另类办法
本栏目热门文章
·WEB打印设置解决方案二(利用ScriptX.cab控件改变IE打印 2005-10-4
·WEB打印设置解决方案三(FileSystem组件实现WEB打印) 2005-10-4
·使用VBScript操作Html复选框(CheckBox)控件 2005-10-4
·automation服务器不能创建对象 2006-1-6
·HTTP_REFERER的工作方式 2005-10-4
·用ASP和Microsoft.XMLDOM分析远程XML文件 2005-10-4
·XMLHTTP Get HTML页面时的中文乱码之完全客户端Scri 2005-10-4
·使用ActiveX控件开发网页常见的问题 2005-10-4
·关于 aspsmartupload 注册问题 2005-10-4
·判断checkbox是否至少有选择一项 2005-10-8
新近更新文章
·ASP网站漏洞解析及黑客入侵防范方法 2006-6-22
·将asp页面转换成htm页面 2006-6-20
·使用JMail组件代替Sql Mail发送Email 遇到的问题 2006-6-15
·Ajax & XMLHttpRequset 2006-6-15
·如何让图片自动缩放以适合界面大小 2006-6-15
·用正则解析图片地址,并利用XMLHTTP组件将其保存 2006-6-15
·用ASP+CSS实现随机背景 2006-6-4
·关于Cookie跨域操作遇到的问题及解决方法 2006-6-4
·编写数据库操作类,使ASP.NET中的数据库操作变得简单 2006-5-22
·一个简单的用存储过程分页 2006-5-18
首 页 | 软件发布 | 广告联系 | 下载帮助 | 意见反馈 | 网站地图
  CopyRight? 2002-2004 WWW.SXSKY.NET? All Rights Reserved
三湘时空 站长QQ:82675303 Email: