Ændrign af string

streng = replace(streng, "\","/")

Burde løse dit problem

hvis du bruger vb4-5 har man ikke Replace() funktionen, så kan du gørre det sådan:


Private Sub Form_Load()
  Me.Caption = Drv2Http("P:\blabla\lala\ting.pdf")
End Sub

Public Function Drv2Http(ByVal strPath As String) As String
Dim i As Integer
Dim strOne As String
Dim strOut As String
  For i = 1 To Len(strPath)
    strOne = Mid$(strPath, i, 1)
    Select Case strOne
          Case "\"
            strOut = strOut & "/"
          Case Else
            strOut = strOut & strOne
    End Select
  Next i
Drv2Http = ("http:/" & Mid$(strOut, 3))
End Function