home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / iis4_03.cab / iigtdata.asp < prev    next >
Text File  |  1997-11-12  |  3KB  |  96 lines
  1. <%@ LANGUAGE=VBScript %>
  2. <% Option Explicit %>
  3. <% Response.Expires = 0 %>
  4.  
  5. <% 
  6.  
  7. Const L_DONTASK_TEXT = "Don't display this dialog again."
  8. Const L_YES_TEXT="  Yes  "
  9. Const L_NO_TEXT="   No   "
  10.  
  11. Dim L_CLEARPATHS_TEXT, L_CHILDDIRS_TEXT, L_CLICKYES_TEXT, L_CLICKNO_TEXT 
  12.  
  13. if Session("vtype") = "svc" then
  14.     L_CLEARPATHS_TEXT = "Property changes made to master properties will not be applied to sites and child directories "
  15.     L_CHILDDIRS_TEXT = "sites and child directories."
  16. else
  17.     if Session("vtype") = "server" then
  18.         L_CLEARPATHS_TEXT = "Property changes made to this site will not be applied to child directories "
  19.     else
  20.         L_CLEARPATHS_TEXT = "Property changes made to this directory will not be applied to child directories "    
  21.     end if
  22.     L_CHILDDIRS_TEXT = "child directories."    
  23. end if
  24. L_CLEARPATHS_TEXT = L_CLEARPATHS_TEXT + "whose properties have already been explicitly set, unless you choose to override those previously set properties."
  25.  
  26. L_CLICKYES_TEXT = "Click Yes if you want to override explicitly set properties on all " + L_CHILDDIRS_TEXT 
  27. L_CLICKNO_TEXT = "Click No if you do not want to override explicitly set properties on all " + L_CHILDDIRS_TEXT 
  28.  
  29.  
  30. On Error Resume Next 
  31.  
  32. Session("clearPaths") = ""
  33. Session("clearPathsOneTime") = ""
  34. %>
  35.  
  36.  
  37. <HTML>
  38. <HEAD>
  39. <TITLE></TITLE>
  40. <SCRIPT LANGUAGE="JavaScript">
  41.     function setClearPaths(val){
  42.         top.opener.top.connect.location.href="iisess.asp?clearPaths="+val;
  43.         top.opener.top.connect.location.href="iiscript.asp?actions=top.body.tool.toolFuncs.save();";
  44.         window.close();
  45.     }
  46.     
  47.     function dontAsk(){
  48.         top.opener.top.connect.location.href="iisess.asp?dontask=true";        
  49.         top.opener.top.connect.location.href="iiscript.asp?actions=top.title.Global.dontAsk=true;";
  50.  
  51.     }
  52. </SCRIPT>
  53. </HEAD>
  54.  
  55. <BODY BGCOLOR="#CCCCCC" LINK="#FFFFFF" LEFTMARGIN=0 TOPMARGIN=0 STYLE="font-face: Helv,Arial; font-size:10pt;">
  56.  
  57. <FORM NAME="userform">
  58.  
  59. <P>
  60. <TABLE HEIGHT="100%" WIDTH="100%"  CELLPADDING=0 CELLSPACING=0>
  61. <TR><TD VALIGN="top">
  62.     <TABLE BORDER=0 BGCOLOR="#CCCCCC" WIDTH="99%"  CELLPADDING=10 CELLSPACING=0>
  63.         <TR>
  64.             <TD COLSPAN = 2>
  65.                 <FONT FACE="HELV,ARIAL" SIZE=1>
  66.                     <%= L_CLEARPATHS_TEXT %><P>
  67.  
  68.                     <%= L_CLICKYES_TEXT %><P>
  69.                     <%= L_CLICKNO_TEXT %><P>
  70.                 
  71.                 </FONT>
  72.             </TD>
  73.         </TR>
  74.         
  75.         <TR>
  76.             <TD>
  77.                 <FONT FACE="HELV,ARIAL" SIZE=1>
  78.                     <INPUT TYPE="checkbox" onClick="dontAsk();"> <%= L_DONTASK_TEXT %>
  79.                 </FONT>
  80.             </TD>
  81.             <TD ALIGN="right">
  82.                 <FONT FACE="HELV,ARIAL" SIZE=1>
  83.                     <INPUT TYPE="button" VALUE="<%= L_YES_TEXT %>" OnClick="setClearPaths('True');">   
  84.                     <INPUT TYPE="button" VALUE="<%= L_NO_TEXT %>" OnClick="setClearPaths('');">                                    
  85.                 </FONT>
  86.             </TD>
  87.         </TR>        
  88.     </TABLE>
  89. <P>
  90. </TD>
  91. </TR>
  92. </TABLE>
  93. </FORM>
  94.  
  95. </BODY>
  96. </HTML>