home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 9 / IOPROG_9.ISO / contrib / iis4 / iis4_03.cab / iiloghd.asp < prev    next >
Encoding:
Text File  |  1997-08-13  |  1.7 KB  |  69 lines
  1. <%@ LANGUAGE=VBScript %>
  2. <%Option Explicit %>
  3.  
  4. <%
  5. Const L_GENERAL_TEXT = "General Properties"
  6. Const L_EXT_TEXT = "Extended Properties"
  7. Const L_ODBC_TEXT = "ODBC Properties"
  8.  
  9. On Error Resume Next 
  10.  
  11. Dim path, currentobj
  12.  
  13. path=Session("dpath")
  14. Session("path")=path
  15. Set currentobj=GetObject(path)
  16.  
  17. %>
  18. <HTML>
  19. <HEAD>
  20.  
  21. <SCRIPT LANGUAGE="JavaScript">
  22.  
  23.     function loadHelp(){
  24.         top.head.Global.helpFileName="iipy_41";
  25.     }
  26.     
  27.     function loadPage(pagename)
  28.         {
  29.             parent.head.location.href = "iilogmn.asp#"+pagename;
  30.             if (pagename == "EXT"){
  31.                 top.head.Global.helpFileName="iipy_42";                
  32.             }
  33.             else{
  34.                 if (pagename == "ODBC"){
  35.                     top.head.Global.helpFileName="iipy_43";                    
  36.                 }
  37.                 else{
  38.                     top.head.Global.helpFileName="iipy_41";                    
  39.                 }
  40.             }
  41.         }
  42.                 
  43. </SCRIPT>
  44.  
  45. </HEAD>
  46.  
  47. <BODY TOPMARGIN=0 LEFTMARGIN=0 BGCOLOR="#CCCCCC" LINK="#000000" VLINK="#000000" ALINK="navy" onLoad="loadHelp();">
  48. <TABLE BORDER = 0 BGCOLOR="#AAAAAA" WIDTH = 100% CELLSPACING=0 CELLPADDING=5>
  49.     <TR>
  50.     
  51.         <% if Session("setLogUI") = "ODBC" then %>
  52.             <TD ALIGN=center WIDTH = 140><FONT SIZE=1 FACE="Helv" COLOR="#000000"><%= L_ODBC_TEXT %></TD>    
  53.         <% else %>
  54.         
  55.             <TD ALIGN=center WIDTH = 140><FONT SIZE=1 FACE="Helv" COLOR="#000000"><A HREF="javascript:loadPage('GENERAL');"><%= L_GENERAL_TEXT %></A></TD>
  56.             
  57.             <% if Session("setLogUI") = "EXT" then %>
  58.             <TD ALIGN=center WIDTH = 2><FONT SIZE=1 FACE="Helv" COLOR="#FFFFFF">|</FONT></TD>
  59.             <TD ALIGN=center WIDTH = 140><FONT SIZE=1 FACE="Helv" COLOR="#000000"><A HREF="javascript:loadPage('EXT');"><%= L_EXT_TEXT %></A></TD>    
  60.             <% end if %>
  61.         
  62.         <% end if %>
  63.     
  64.         <TD></TD>                        
  65.     </TR>
  66. </TABLE>
  67. </BODY>
  68. </HTML>
  69.