home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / ins.cab / nnredir.asp < prev    next >
Text File  |  1997-10-12  |  1KB  |  53 lines

  1. <% Response.Expires = 0 %>
  2. <%
  3. REM LOCALIZATION
  4.  
  5. L_PAGETITLE_TEXT = "Microsoft Internet Service Manager"
  6.  
  7. REM END LOCALIZATION
  8. %>
  9.  
  10. <% REM Get variables %>
  11. <% REM svr = Server name %>
  12. <% REM pg = Page to be loaded in main frame %>
  13. <% REM lgt = Logging type (to determine loading of Logging page) %>
  14. <% REM bg = Background color for blank page (black, grey) %>
  15.  
  16. <% svr = Request("svr") %>
  17. <% pg = Request("pg") %>
  18. <% lgt = Request("lgt") %>
  19. <% bg = Request("bg") %>
  20.  
  21. <HTML>
  22. <HEAD>
  23. <TITLE><% = L_PAGETITLE_TEXT %></TITLE>
  24. </HEAD>
  25.  
  26. <% if (bg = "black") then %>
  27.  
  28.     <BODY BGCOLOR="#000000">
  29.  
  30. <% else %>
  31.  
  32.     <BODY BGCOLOR="#CCCCCC">
  33.  
  34. <% end if %>
  35.  
  36. <% REM If page is specified, redirect; otherwise display blank page of specified color %> 
  37.  
  38. <% if (pg <> "") then %>
  39.  
  40.     <SCRIPT LANGUAGE="javascript">
  41.         self.location = "<% = pg %>.asp?svr=<% = svr %>";    
  42.     </SCRIPT>
  43.  
  44. <% end if %>
  45.  
  46. <FORM NAME="hiddenform">
  47.  
  48.     <INPUT TYPE="hidden" NAME="helpfilename" VALUE="help/nnsrvh.htm">
  49.  
  50. </FORM>
  51.  
  52. </BODY>
  53. </HTML>