_File_GetFileName()

[GEOSoft]

In the past people have generally used _PathSplit() as the prefered method for getting a file name. That's doing it the long way. Here is a shorter method that I'll be adding to my FileX.au3 UDF soon. It returns the file name from either a normal system path or a URL path and includes error checking.

Example usage:

;
$sFile = "http://dundats.mvps.org/my files/FileName.htm"
MsgBox(0, "Test", _File_GetFileName($sFile))
$sFile = "C:\Some\Folder\Path\Another FileName.au3"
MsgBox(0, "Test", _File_GetFileName($sFile))
;

_File_GetFileName()

;
Func _File_GetFileName($sStr)
   $sStr = StringRegExpReplace($sStr, "^.*[\\|/](.+\..+)$", "$1")
   If @Error OR (NOT $sStr) Then Return SetError(1, 1, "")
   Return $sStr
EndFunc
;

If you don't want error checking then you can use this simplified version

;
Func _File_GetFileName($sStr)
   Return StringRegExpReplace($sStr, "^.*[\\|/](.+\..+)$", "$1")
EndFunc
;

[ResNullius]

George,

Don't you mean

$sStr = StringRegExpReplace($sStr, "^.*[\\|/](.+)$", "$1")

Your example fails if the file has no extension specified.

[GEOSoft]

George,

Don't you mean

$sStr = StringRegExpReplace($sStr, "^.*[\\|/](.+)$", "$1")

Your example fails if the file has no extension specified.

That's exactly what I started with but then I decided that I only wanted it to work on files and not on folders so I changed it.

I could have used what you have or even

$sStr = StringRegExpReplace($sStr, "^.*[\\|/](.+\.?.+)$", "$1")

But either of those will also return the last part of the path even if it's a folder. Although that won't be difficult to solve either with FileGetAttrib() in there as well. For an example of this in use look here.