home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / ins.cab / nnexpg.asp < prev    next >
Text File  |  1997-10-12  |  765b  |  30 lines
  1. <% Response.Expires = 0 %>
  2.  
  3. <% REM Get variables %>
  4. <% REM svr = Server name %>
  5. <% REM id = Expiration Policy Id %>
  6. <%
  7. L_PAGETITLE_TEXT        = "Microsoft Internet Service Manager"
  8. %>
  9. <% svr = Request("svr") %>
  10. <% id = Request("id") %>
  11.  
  12. <HTML>
  13. <HEAD>
  14. <TITLE><% = L_PAGETITLE_TEXT %></TITLE>
  15. </HEAD>
  16.  
  17. <% REM Determine browser to set frame size %>
  18.  
  19. <% if Instr(Request.ServerVariables("HTTP_USER_AGENT"),"MSIE") then %>
  20.     <FRAMESET ROWS="130,*" FRAMEBORDER=0 FRAMESPACING=1>          
  21. <% else %>
  22.     <FRAMESET ROWS="150,*" FRAMEBORDER=0 FRAMESPACING=1>
  23. <% end if %>
  24.          <FRAME SRC="nnexpghd.asp?svr=<% = svr %>&id=<% = id %>" NAME="head" SCROLLING="no">
  25.          <FRAME SRC="blank.htm" FRAMEBORDER=1 NAME="list" SCROLLING="auto">
  26.      </FRAMESET>
  27.  
  28. </HTML>
  29.  
  30.