Showing posts with label
remove trailing backslash using script.
Show all posts
Showing posts with label
remove trailing backslash using script.
Show all posts
On Error Resume Next
Dim strNewValue, Path, slash
Path = InputBox("Enter Folder Path", "Please Enter", "")
slash = Len(DatabasePath1)-1
strNewValue = mid(Path, 1, slash)
msgbox StrNewValue