This is what I was looking for thanks! I will study the code and integrate into our website. Thanks again!
-----Original Message----- From: Robert Harrison [mailto:[email protected]] Sent: Friday, January 09, 2009 12:19 PM To: cf-talk Subject: RE: File upload and make unique Assuming you are uploading from a form and the name of the file field is "file", the routine below will do it. You will need to rename the paths as necessary. This routine will: 1) Rename the file with incremental numbers (1, 2, 3, etc) 2) Ensure the file name uses only standard characters (so it can be used in URL strings if you want to link to the file) 3) Report back the final uploaded file name as the variable "upl_file" 4) Prevent users from uploading dangerous file types (.cfm, .com, .exe, etc.) Hope this helps. <cfsetting requesttimeout="3600"> <cfparam name="form.file" default=""> <!--- *********************** START OF FILE HANDLING *********************** ---> <cfif #form.file# is not ""> <cffile action="upload" filefield="file" destination="ROOT\YOUR_PATH_HERE" nameconflict="makeunique"> <cfset file_ext="#ListLast(serverfile,".")#"> <cfif file_ext is "exe" or file_ext is "com" or file_ext is "cfm" or file_ext is "cfml" or file_ext is "dll" or file_ext is "mdb" or file_ext is "vbs"> <p class="msg"><img src="../error.gif" border="0"><br />The file you uploaded uses the<br /> extension .<cfoutput>#file_ext#</cfoutput>.</p> <p class="msg"><strong>This file type is not allowed.<br /> The upload is aborted.</strong><br /> <br /> Please return and select an acceptable file type<br /> or zip the file before uploading.</p> <p class="center"><br /><cfoutput><form class="center"><input type="button" name="back" value="Back to <cfif reply eq 1>Reply to Message<cfelse>Post A New Message</cfif>" onClick="history.go(-1)"></form></cfoutput></p> </div> </body> </html> <cffile action="delete" file ROOT\YOUR_PATH_HERE\#serverfile#"> <cfabort> </cfif> <cfset upl_file="#serverfile#"> <cfset upl_descr="#clientfile#"> <!--- ***************** ensures file name will be a legal name having no special characters ************************** ---> <cfset upl_file_nme="#ListFirst(serverfile,".")#"> <cfset upl_file_ext="#ListLast(serverfile,".")#"> <cfset upl_file_nme="#ReplaceList(trim(upl_file_nme), " ,]'", ",,")#"> <cfset upl_file_nme="#REREPLACE("#upl_file_nme#","#chr(8226)#","","all")#"> <cfset upl_file_nme="#REReplace (upl_file_nme, "[##""%/\\*?<>|:$'&@,(){}~`^!+;=[]", "", "all")#"> <cfset upl_file_nme2="#upl_file_nme#"> <cfset new_file="#upl_file_nme#.#upl_file_ext#"> <cfif new_file is not "#serverfile#"> <!--- if the file name has changed ---> <cfdirectory action="list" directory = ROOT\YOUR_PATH_HERE\" name="checkfile" filter="#new_file#"> <!--- renames file until name is unique ---> <cfif checkfile.recordcount gt 0> <cfset unique=0> <cfset fcount=1> <cfloop condition="unique neq 1"> <cfset upl_file_nme2="#upl_file_nme##fcount#"> <cfdirectory action="list" directory = ROOT\YOUR_PATH_HERE\" name="checkfile" filter="#upl_file_nme2#.#upl_file_ext#"> <cfif checkfile.recordcount eq 0> <cfset unique=1> <cfbreak> <cfelse> <cfset fcount=#fcount#+1> </cfif> </cfloop> </cfif> <cfset upl_file="#upl_file_nme2#.#upl_file_ext#"> <cffile action="rename" source ROOT\YOUR_PATH_HERE\#serverfile#" destination ROOT\YOUR_PATH_HERE\#upl_file#"> <cfelse> <cfset upl_file="#serverfile#"> </cfif> <cfelse> <cfset upl_file=""> </cfif> <!--- ***************** end of file rename routine *************************** ---> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Adobe® ColdFusion® 8 software 8 is the most important and dramatic release to date Get the Free Trial http://ad.doubleclick.net/clk;207172674;29440083;f Archive: http://www.houseoffusion.com/groups/cf-talk/message.cfm/messageid:317654 Subscription: http://www.houseoffusion.com/groups/cf-talk/subscribe.cfm Unsubscribe: http://www.houseoffusion.com/cf_lists/unsubscribe.cfm?user=89.70.4
