home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / iis4_03.cab / iiapphd.asp < prev    next >
Text File  |  1997-11-12  |  2KB  |  69 lines
  1. <%@ LANGUAGE=VBScript %>
  2. <% Option Explicit %>
  3. <% Response.Expires = 0 %>
  4.  
  5. <% if Session("FONTSIZE") = "" then %>
  6.     <!--#include file="iito.inc"-->
  7. <% else %>
  8.  
  9. <%
  10. Const L_ASP_TEXT = "Active Server Pages"
  11. Const L_DBG_TEXT = "ASP Debugging"
  12. Const L_OTHER_TEXT = "Other"
  13.  
  14.  
  15. On Error Resume Next 
  16.  
  17. Dim path, currentobj
  18.  
  19. path=Session("dpath")
  20. Session("path")=path
  21. Set currentobj=GetObject(path)
  22.  
  23. %>
  24. <HTML>
  25. <HEAD>
  26.  
  27. <SCRIPT LANGUAGE="JavaScript">
  28.     function loadHelp(pagename){
  29.         if (pagename == null){
  30.             top.title.Global.helpFileName="iipy_32";
  31.         }
  32.         if (pagename == "ASP"){
  33.             top.title.Global.helpFileName="iipy_32";
  34.         }
  35.         if (pagename == "DBG"){
  36.             top.title.Global.helpFileName="iipy_33";
  37.         }
  38.         if (pagename == "OTHER"){
  39.             top.title.Global.helpFileName="iipy_35";
  40.         }                
  41.         
  42.     }
  43.  
  44.     function loadPage(pagename)
  45.         {
  46.             parent.head.location.href = "iiappmn.asp#"+pagename;
  47.             loadHelp(pagename);
  48.         }
  49. </SCRIPT>
  50.  
  51. </HEAD>
  52.  
  53. <BODY TOPMARGIN=0 LEFTMARGIN=0 BGCOLOR="#CCCCCC" LINK="#000000" VLINK="#000000" ALINK="navy" onLoad="loadHelp('ASP');">
  54. <TABLE BORDER = 0 BGCOLOR="#AAAAAA" WIDTH = 100% CELLSPACING=0 CELLPADDING=5>
  55.     <TR>
  56.         <TD ALIGN=center WIDTH = 140><FONT SIZE=1 FACE="Helv,ARIAL" COLOR="#000000"><A HREF="javascript:loadPage('ASP');"><%= L_ASP_TEXT %></A></TD>
  57.         <TD ALIGN=center WIDTH = 2><FONT SIZE=1 FACE="Helv,ARIAL" COLOR="#FFFFFF">|</FONT></TD>
  58.         <TD ALIGN=center WIDTH = 140><FONT SIZE=1 FACE="Helv,ARIAL" COLOR="#000000"><A HREF="javascript:loadPage('DBG');"><%= L_DBG_TEXT %></A></TD>
  59.         
  60.         <% if Session("setProcOpts")then %>
  61.         <TD ALIGN=center WIDTH = 2><FONT SIZE=1 FACE="Helv,ARIAL" COLOR="#FFFFFF">|</FONT></TD>            
  62.         <TD ALIGN=center WIDTH = 140><FONT SIZE=1 FACE="Helv,ARIAL" COLOR="#000000"><A HREF="javascript:loadPage('OTHER');"><%= L_OTHER_TEXT %></A></TD>            
  63.         <% end if %>
  64.         <TD></TD>                        
  65.     </TR>
  66. </TABLE>
  67. </BODY>
  68. </HTML>
  69. <% end if %>