home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 9 / IOPROG_9.ISO / contrib / iis4 / ins.cab / nnexpg.asp < prev    next >
Encoding:
Text File  |  1997-08-16  |  694 b   |  28 lines

  1. <% Response.Expires = 0 %>
  2.  
  3. <% REM Get variables %>
  4. <% REM svr = Server name %>
  5. <% REM id = Expiration Policy Id %>
  6.  
  7. <% svr = Request("svr") %>
  8. <% id = Request("id") %>
  9.  
  10. <HTML>
  11. <HEAD>
  12. <TITLE>NS Administration</TITLE>
  13. </HEAD>
  14.  
  15. <% REM Determine browser to set frame size %>
  16.  
  17. <% if Instr(Request.ServerVariables("HTTP_USER_AGENT"),"MSIE") then %>
  18.     <FRAMESET ROWS="130,*" FRAMEBORDER=0 FRAMESPACING=1>          
  19. <% else %>
  20.     <FRAMESET ROWS="150,*" FRAMEBORDER=0 FRAMESPACING=1>
  21. <% end if %>
  22.          <FRAME SRC="nnexpghd.asp?svr=<% = svr %>&id=<% = id %>" NAME="head" SCROLLING="no">
  23.          <FRAME SRC="blank.htm" FRAMEBORDER=1 NAME="list" SCROLLING="auto">
  24.      </FRAMESET>
  25.  
  26. </HTML>
  27.  
  28.