Dim req As Net.FtpWebRequest = DirectCast(Net.WebRequest.Create( _
          "ftp://myserver.de/Beispieldatei.txt"), Net.FtpWebRequest)
        req.Credentials = New Net.NetworkCredential("benutzername", "passwort")
        req.Method = Net.WebRequestMethods.Ftp.UploadFile
 
        'Stream holen und Inhalt schreiben (über StreamWriter)
        Using sw As IO.TextWriter = New IO.StreamWriter(req.GetRequestStream(), _
          System.Text.Encoding.UTF8)
            sw.Write("Dies ist ein Beispieltext.")
        End Using
 
        'Antwort des Servers auslesen
        Using resp As Net.FtpWebResponse = DirectCast(req.GetResponse(), _
          Net.FtpWebResponse)
        End Using