Return only file name without path
Return only file name without path
Rate Return only file name without path
(1(1 Vote))
WithOutPath = WithPath
Do Until InStr(WithOutPath, "\") = 0
AllLen = Len(WithOutPath)
Where = InStr(WithOutPath, "\")
WithOutPath = Right(WithOutPath, AllLen - Where)
Loop
FileName = WithOutPath
End Function
Return only file name without path Comments
No comments yet — be the first to post one!
Post a Comment