by Stewart MacFarlane (2 Submissions)
Category: Files/File Controls/Input/Output
Compatability: Visual Basic 3.0
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: 
(4 Votes)
Ever wanted to extract a filename only from a path including the filename, well this simple function will do it for you! (I know its not ground breaking but its simple easy and useful)
Inputs
call the function like this:
get_filename_only(filepath$) where filepath$ is a variable containing a filepat and filename
or
get_filename_only("c:\windows\notepad.exe") change the path to suit your needs
Assumes
put this code into a module (.bas) and call from the program as explained above
Code Returns
the filename only (incl. extension) or a message telling you to check the path if it cant find a valid path in the string you sent to it.
VBcodersFunction get_filename_only(filepath)
For x = Len(filepath) To 1 Step -1
If Mid(filepath, x, 1) = "\" Then
get_filename_only = Right(filepath, Len(filepath) - x)
Exit Function
End If
Next x
get_filename_only = "Please check filepath it may be incorrect)"
End Function
