P°idßnφ lomφtka do cesty

Funkce:
Function AddBackslash (Path As String, Optional Char As String = "\") As String 

   If Right$(Path, 1) <> Char Then 
      AddBackslash = Path & Char 
   Else 
      AddBackslash = Path 
   End If 

End Function

Zp∞t

Autor: The Bozena