This simple function reverses a slash in a string. (Similar to @ReplaceSubString in formula language)
Sub ReplaceSlashes (sPath As String)
'***************************************************************************************************
'* The following subroutine replaces all slashes (\) in the filename with a '/'.
'***************************************************************************************************
Do While Instr(sPath,"\") > 0
sPath = Left$(sPath, Instr(sPath,"\")-1) + "/" + Right$(sPath,Len(sPath)-Instr(sPath,"\"))
Loop
End Sub
previous page
|