CFLib.org – Common Function Library Project

Description:
Pass a full file path to this function; if the file exists, the function will return a new, unique file name.

Return Values:
Returns a string.

Example:

<cfset newFile = CreateUniqueFileName(GetCurrentTemplatePath())>
<cfoutput>Your New File Name: #newFile#</cfoutput>

Parameters:

Full UDF Source:

/**
 * Creates a unique file name; used to prevent overwriting when moving or copying files from one location to another.
 * v2, bug found with dots in path, bug found by joseph
 * v3 - missing dot in extension, bug found by cheesecow
 * 
 * @param fullpath      Full path to file. (Required)
 * @return Returns a string. 
 * @author Marc Esher (marc.esher@cablespeed.com) 
 * @version 3, July 1, 2008 
 */
function createUniqueFileName(fullPath){
    var extension = "";
    var thePath = "";
    var newPath = arguments.fullPath;
    var counter = 0;
    
    if(listLen(arguments.fullPath,".") gte 2) extension = listLast(arguments.fullPath,".");
    thePath = listDeleteAt(arguments.fullPath,listLen(arguments.fullPath,"."),".");

    while(fileExists(newPath)){
        counter = counter+1;        
        newPath = thePath & "_" & counter & "." & extension;            
    }
    return newPath;    
}