MakeUniqueFilename
Sub MakeUniqueFilename($fileName As String) As String
Returns an unique filename by adding numbers to the filename specified in $fileName. The returned filename doesn't exist in the specified directory.
Parameters
Example:
Dim $sFilename
$sFilename = "e:\exp\main.txt"
' Assume that e:\exp\main.txt doesn't exist
$sFilename = MakeUniqueFilename($sFilename)
' returns $sFilename = "e:\exp\main.txt"
StringToFile($sFilename, "dummy")
' returns $sFilename = "e:\exp\main(1).txt"