home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / iis4_03.cab / iistat.asp < prev    next >
Text File  |  1997-11-12  |  2KB  |  67 lines
  1. <%@ LANGUAGE=VBScript %>
  2. <% Option Explicit %>
  3. <% Response.Expires = 0 %>
  4.  
  5. <% 
  6.  
  7. On Error Resume Next 
  8.  
  9. Dim State, logon, moving
  10.  
  11. State=Request.QueryString("thisState")
  12. logon=Request.QueryString("logon")
  13. moving=Request.QueryString("moving")
  14.  %>
  15.  
  16. <HTML>
  17. <HEAD>
  18.     <TITLE>Untitled</TITLE>
  19.  
  20.     <SCRIPT LANGUAGE="JavaScript">
  21.         function startTimer(){    
  22.             <% if State <> "" then %>
  23.                 setTimeout("killMsg()", 8000);  
  24.             <% end if %>
  25.         }
  26.  
  27.         function killMsg(){
  28.             self.location.href="iistat.asp?thisState="
  29.         }
  30.     </SCRIPT>
  31.  
  32. </HEAD>
  33. <% if State="Loading" then %>
  34.     <BODY BGCOLOR="#000000" TEXT="#FFCC00" LINK="#FFFFFF" ALINK="#FFFFFF" VLINK="#FFFFFF" onLoad="startTimer()" TOPMARGIN=3 LEFTMARGIN=3>
  35.     <IMG SRC="images/loading.gif" WIDTH=371 HEIGHT=23 BORDER=0 ALT="">
  36.  
  37. <% else %>
  38.  
  39.     <BODY BGCOLOR="#000000" TEXT="#FFCC00" LINK="#FFFFFF" ALINK="#FFFFFF" VLINK="#FFFFFF" onLoad="startTimer()" TOPMARGIN=0 LEFTMARGIN=0>
  40.  
  41.         <TABLE HEIGHT="100%" ALIGN="left" CELLPADDING=1 CELLSPACING=1>
  42.                 <TR>
  43.                     <TD VALIGN="middle">
  44.                         <FONT FACE="HELV,ARIAL" SIZE=1>
  45.                         
  46.                         <% if State <> "" then %>
  47.                             <% if moving <> "" then %>
  48.                                 <IMG SRC="images/info_ani.gif" WIDTH=16 HEIGHT=16 HSPACE=2 BORDER=0 ALT="" ALIGN="top">
  49.                             <% else %>
  50.                                 <IMG SRC="images/info.gif" WIDTH=16 HEIGHT=16 HSPACE=2 BORDER=0 ALT="" ALIGN="top">                            
  51.                             <% end if %>
  52.                             <%= State %>
  53.                         <% end if %>
  54.                         </FONT>        
  55.                     </TD>
  56.                 </TR>
  57.         
  58.         </TABLE>
  59.     
  60. <% end if %>
  61.  
  62. <!-- preload the loading gif... -->
  63. <IMG SRC="images/loading.gif" WIDTH=1 HEIGHT=1 BORDER=0 ALT="">
  64.  
  65. </BODY>
  66. </HTML>
  67.