Public Function IncrementFileNameSimple( _ ByVal vPathName As Variant _ ) As Variant
IncrementFileNameSimple("FILE.EXE") = "FILF.EXE" IncrementFileNameSimple("PICTURES.TXT") = "PICTURET.TXT" IncrementFileNameSimple("FILE99.EXE") = "FILE9@ .EXE" IncrementFileNameSimple("FILE9999.EXE") = "FILE999@ .EXE"See also:
IncrementFileName Function IncrementStringWithinCharacterSet Function DOSFileNameCharacters PropertyvPathName: String containing the file name to be incremented. The file name can contain drive, path (directory), file name and file extension components. Function returns Null if vPathName is Null or cannot be fixed up to a String.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.