Data Type VisualBasic Script

Sub InstrRevExample()
    Debug.Print InStrRev("c:\my documents\my file.txt", "\")
End Sub