home *** CD-ROM | disk | FTP | other *** search
/ Computer Shopper 139 / dpcs0999.iso / Web / CFserver / data1.cab / Administrator / filedialog / index.cfm (.txt)
Encoding:
ColdFusion Encrypted Template  |  1999-04-12  |  3.0 KB  |  93 lines
  1. <CFNewInternalRegistry ACTION=GET
  2.     Branch="HKEY_LOCAL_MACHINE\SOFTWARE\Allaire\ColdFusion\CurrentVersion\Server"
  3.     Entry="AdminPassword"
  4.     Type="STRING"
  5.     Variable="AdminPassword">
  6. <CFPARAM Name="AdminPassword" Default="">
  7.  
  8.  
  9. <CFPARAM NAME="DialogStyle" DEFAULT="SelectFile">
  10.  
  11. <CFIF DialogStyle IS "SelectDirectory">    
  12.     <CFSET ShowFiles = "No">
  13.     <CFPARAM NAME="DialogCaption" DEFAULT="Select Directory on the Server">
  14. <CFELSE>
  15.     <CFSET ShowFiles = "Yes">
  16.     <CFPARAM NAME="DialogCaption" DEFAULT="Select File on the Server">
  17. </CFIF>
  18.  
  19. <CFIF ParameterExists(Extensions) IS "NO">
  20.     <CFSET Extensions = "">
  21. </CFIF>
  22.  
  23. <CFIF Server.OS.Name IS "UNIX">
  24.     <CFSET TreeSeparator = "/">
  25. <CFELSE>
  26.     <CFSET TreeSeparator = "\\">
  27. </CFIF>
  28.  
  29. <HTML>
  30. <HEAD><TITLE><CFOUTPUT>#DialogCaption#</CFOUTPUT></TITLE>
  31.     <SCRIPT LANGUAGE="JavaScript">
  32.     <!--
  33.     
  34.     function GetSelectedPath() {
  35.        //var SelectedPath;
  36.        //SelectedPath = document.TreeControl.currentPath("\\");
  37.        //SelectedPath = parent.DirectoryOutline.document.TreeControl.currentPath("\\");
  38.        document.FileDialogForm.SelectedPath.value = document.TreeControl.currentPath("<CFOUTPUT>#TreeSeparator#</CFOUTPUT>");
  39.        document.FileDialogForm.submit();
  40.     }
  41.     
  42.     //-->
  43. </SCRIPT>
  44. </HEAD>
  45. <!--- General page formatting is controled by this template --->
  46. <cfinclude template="../formatting/header.cfm">
  47.  
  48. <CENTER>
  49. <TABLE  CELLSPACING=0 CELLPADDING=3 WIDTH=0 BORDER=0>
  50.     <TR  BGCOLOR="#669966">
  51.         <TD COLSPAN=2>
  52.             <CFOUTPUT>
  53.             <FONT SIZE="-1" FACE="Arial" COLOR="##FFFFFF"><B>#DialogCaption#</B></FONT>
  54.             </CFOUTPUT>
  55.         </TD>
  56.     </TR>
  57.     <TR>
  58.         <TD>                
  59.             <APPLET CODEBASE="/CFIDE/classes/" CODE="allaire.cfide.CFNavigationApplet" WIDTH=300 HEIGHT=300 NAME="TreeControl">
  60.                 <PARAM NAME="ApplicationClass" VALUE="allaire.cfide.CFNavigation">
  61.                 <PARAM NAME="ShowFiles" VALUE="<CFOUTPUT>#ShowFiles#</CFOUTPUT>">
  62.                 <PARAM NAME="Extensions" VALUE="<CFOUTPUT>#Extensions#</CFOUTPUT>">
  63.                 <PARAM NAME="DefaultPath" VALUE="<CFOUTPUT>#DefaultPath#</CFOUTPUT>">
  64.                 <PARAM NAME="ServerCaption" VALUE="ColdFusion Server">
  65.                 <PARAM NAME="Border" VALUE="Yes">
  66.                 <PARAM NAME="VScroll" VALUE="Yes">
  67.                 <PARAM NAME="passkey" VALUE="<CFOUTPUT>#AdminPassword#</CFOUTPUT>">
  68.                 <PARAM NAME="OS" VALUE="<CFOUTPUT>#Server.OS.Name#</CFOUTPUT>">
  69.             </APPLET>
  70.         </TD>
  71.         <TD VALIGN="TOP">
  72.             <CFFORM
  73.                     NAME="FileDialogForm" 
  74.                     TARGET="#URLtarget#" 
  75.                     ACTION="#ReturnURL#" 
  76.                     ENABLECAB="Yes"
  77.                     METHOD="POST">
  78.             
  79.             <INPUT TYPE="hidden" NAME="SelectedPath" VALUE="">
  80.             <INPUT TYPE="button" NAME="OKPressed" VALUE="    OK    " onClick="GetSelectedPath()"><BR>
  81.             <INPUT TYPE="SUBMIT" NAME="Cancel" VALUE="Cancel">
  82.             </CFFORM>
  83.         </TD>
  84.     </TR>
  85. </TABLE>
  86. </CENTER>
  87.  
  88. <!--- This closes the page formatting template --->
  89. <CFINCLUDE TEMPLATE="../formatting/footer.cfm">
  90. </BODY>
  91. </HTML>
  92.  
  93.