Inet1.url = "ftp://Login:Passwort@Server"
Inet1.RequestTimeout = 10
 
' Gibt den Ordner zurück
Inet1.Execute , "PWD"
 
' Datei hochladen
Inet1.Execute , "PUT c:\test.txt test.txt"
 
' Ftp-Verzeichnisinhalt holen
Inet1.Execute , "DIR"
serverFilesStr = Inet1.GetChunk(1024, icString)
 
' Datei vom Server holen
Inet1.Execute , "GET test.txt c:\test.txt"
 
' Datei vom Server löschen
Inet1.Execute , "DELETE test.txt"
 
' Die Verbindung schließen
Inet1.Execute , "CLOSE"