Parsingfunktion – Dateiname

Diese Funktion ist das Gegenstück zu GetPath (strPath).

Sie liefert den Dateinamen als String zurück. Im Beispiel von C:\Windows\System\mscdex.exe 

Sie benötigen hierzu auch die Funktion ReverseInStr aus dem Tipp
Stringmanipulation – Parsen – Textmanipulation (Link siehe unten) 

Public Function GetFileName(strPath As String) As String

    Dim intPos As Integer

    intPos = ReverseInStr(0, strPath, "\")
    GetFileName = Right(strPath, Len(strPath) - intPos)

End Function

Weiterführende Links:

• Stringmanipulation – Parsen – Textmanipulation