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