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