home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 August / CHIP_08_2003.iso / Spesial / proxy / ProxPro / ProxyPro.exe / data1.cab / ConfigSite_Files / statistics / cachestatistic.agp < prev    next >
Encoding:
Text File  |  2002-12-09  |  4.0 KB  |  129 lines

  1. <%
  2.     dim szPath
  3.     szPath = "Table"
  4.     SkinTable = SysInfo.GetSkinParameter(szPath)
  5.     szPath = "Font"
  6.     SkinFont = SysInfo.GetSkinParameter(szPath)
  7.     szPath = "Link"
  8.     SkinLink = SysInfo.GetSkinParameter(szPath)
  9.     szPath = "VLink"
  10.     SkinVLink= SysInfo.GetSkinParameter(szPath)
  11. %>
  12. <script language="JavaScript">
  13. <!--
  14. function MM_preloadImages() { //v3.0
  15.   var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
  16.     var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
  17.     if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
  18. }
  19.  
  20. function MM_swapImgRestore() { //v3.0
  21.   var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
  22. }
  23.  
  24. function MM_findObj(n, d) { //v4.0
  25.   var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
  26.     d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  27.   if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  28.   for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  29.   if(!x && document.getElementById) x=document.getElementById(n); return x;
  30. }
  31.  
  32. function MM_swapImage() { //v3.0
  33.   var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
  34.    if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
  35. }
  36. //-->
  37. </script>
  38. <html>
  39. <head>
  40. <title>Professional GateKeeper - Infopulse</title>
  41. <!--              -->
  42. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
  43. <title>MediaFamily - Welcome</title>
  44.  
  45. </head>
  46. <body bgcolor="#FFFFFF" text="#000000" topmargin="0" leftmargin="0" marginwidth="0" marginheight="0" background="../images/backgr_x.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  47.   <tr> 
  48.     <td width="344"><img src="images/1_r1_c2.jpg" width="344" height="70"></td>
  49.     <td width="135"><img src="images/1_r1_c3.jpg" width="135" height="70"></td>
  50.     <td width="100"><a href="hlpStatistics.agp"><img src="images/1_r1_c4.jpg" width="100" height="70"border=0></a></td>
  51.     <td width="1000"> </td>
  52.   </tr>
  53. </table>
  54. <map name="n1_r4_c3Map"> 
  55.   <area shape="rect" coords="492,45,567,76" href="#">
  56. </map>
  57.  
  58. <p><big><strong><font face="Arial">Cache service information</font></strong></big></p>
  59. <%
  60.     If Not Len(ErrLine) = 0 Then
  61.         Response.Write("<B><FONT COLOR=""#FF0000"">" & ErrLine & "</FONT></B><br>")
  62.     End If
  63. %>
  64.  
  65. <div align="center">
  66. <table border="1" cellpadding="0" cellspacing="0" width="100%">
  67.     <tr>
  68.         <td width="40%" bgcolor="<%Response.Write(SkinTable)%>"><strong><font face="Arial" color="<%Response.Write(SkinFont)%>">
  69.             Option
  70.         </font></strong></td>
  71.         <td width="60%" bgcolor="<%Response.Write(SkinTable)%>"><strong><font face="Arial" color="<%Response.Write(SkinFont)%>">
  72.             Value
  73.         </font></strong></td>
  74.     </tr>    
  75.     <tr>
  76.         <td width="40%"><strong><font face="Arial">
  77.             Cache size
  78.         </font></strong></td>
  79.         <td width="60%"><font face="Arial">
  80.             <%Response.Write(Cache.Size)%>
  81.         </font></td>
  82.     </tr>
  83.     <tr>
  84.         <td width="40%"><strong><font face="Arial">
  85.             Time-to-live (in hours)
  86.         </font></strong></td>
  87.         <td width="60%"><font face="Arial">
  88.             <%Response.Write(Cache.TimeToLive)%>
  89.         </font></td>
  90.     </tr>
  91.     <tr>
  92.         <td width="40%"><strong><font face="Arial">
  93.             Current cache size (in Mb)
  94.         </font></strong></td>
  95.         <td width="60%"><font face="Arial">
  96.             <%Response.Write(Cache.CurrentExactSize)%>
  97.             (<%Response.Write(Cache.CurentByteSize)%>    bytes)
  98.         </font></td>
  99.     </tr>
  100.     <tr>
  101.         <td width="40%"><strong><font face="Arial">
  102.             Cache directory
  103.         </font></strong></td>
  104.         <td width="60%"><font face="Arial">
  105.             <%Response.Write(Cache.CacheDirectory)%>
  106.         </font></td>        
  107.     </tr>
  108.     </table>
  109.     </center></div>
  110. </form>
  111.  
  112. <%
  113.     sTable = Cache.HostsTable
  114. '    if Len(sTable) > 617 Then
  115. %>
  116. <p><big><strong><font face="Arial">Cache entries</font></strong></big></p>
  117. <%
  118.         Response.Write(sTable)
  119.     'End if
  120.     
  121. %>
  122. <br>
  123. <font size="1" face="Arial"><%Response.Write(GateKeeper.Version)%></font>
  124.  
  125. </body>
  126. </html>
  127.  
  128.  
  129.