Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

61 lines
1.3 KiB

  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3. <!-- #include file="directives.inc" -->
  4. <!--#include file="iistat.str"-->
  5. <%
  6. On Error Resume Next
  7. Dim State, logon, moving
  8. State=Request.QueryString("thisState")
  9. logon=Request.QueryString("logon")
  10. moving=Request.QueryString("moving")
  11. %>
  12. <!--#include file="iisetfnt.inc"-->
  13. <HTML>
  14. <HEAD>
  15. <TITLE>Untitled</TITLE>
  16. <SCRIPT LANGUAGE="JavaScript">
  17. function startTimer(){
  18. <% if State <> "" then %>
  19. setTimeout("killMsg()", 8000);
  20. <% end if %>
  21. }
  22. function killMsg(){
  23. self.location.href="iistat.asp?thisState="
  24. }
  25. </SCRIPT>
  26. </HEAD>
  27. <BODY background='images/greycube.gif' TEXT = 'White' LINK='White' VLINK='White' ALINK='#1DA2CD' TOPMARGIN=0 LEFTMARGIN=0 onLoad='startTimer()'>
  28. <%= sFont("","","",True) %>
  29. <TABLE HEIGHT="100%" ALIGN="left" CELLPADDING=1 CELLSPACING=1>
  30. <TR>
  31. <TD VALIGN="middle">
  32. <%= sFont("","","",True) %>
  33. <% if State="Loading" then %>
  34. <B>&nbsp;<%= L_LOADING_TEXT %></B>
  35. <% else if State <> "" then %>
  36. <B>&nbsp;<%= State %></B>
  37. <% end if %>
  38. </FONT>
  39. </TD>
  40. </TR>
  41. </TABLE>
  42. <% end if %>
  43. <!-- preload the loading gif... -->
  44. <IMG SRC="images/loading.gif" WIDTH=1 HEIGHT=1 BORDER=0 ALT="">
  45. </BODY>
  46. </HTML>