Create Valid Filename UDF

createfilename.cfm

// CONVERT A STRING TO A VALID FILENAME
function CreateFileName(string){
     var str=Trim(string);
     // replace invalid filename characters: /\:*?"<>| and whitespaces with underscores
     str=ReReplace(str,"[*?\""]","","ALL");
     str=ReReplace(str,"\s","_","ALL");
     str=ReReplace(str,"[:<>|]","-","ALL");
     str=Replace(str,"\","_-_","ALL");
     str=Replace(str,"/","_-_","ALL");
     // leading period is also invalid for MACs
     return str;
}