FTP-Upload mit VB.NET 2005 Einfache M?glichkeit zum Uploaden von Dateien per FTP mit Benutzername und Passwort
Autor:   Stefan Remberg	Bewertung:     [ Jetzt bewerten ]	Views:  20.183
www.mdb-tools.de	System:  WinNT, Win2k, WinXP, Vista, Win7, Win8	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 27 Bewertung insgesamt: gut Durchschnittliche Bewertung: 4.4 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Mit nachfolgendem Beispiel möchte ich eine einfache Möglichkeit aufzeigen, um mit VB.NET 2005 Dateien per FTP auf einen FTP-Server hochzuladen.

Zusätzlich wird die Datei beim Upload umbenannt und es wird jeweils der Wochentag (als Zahl) im Dateiname mit angegeben.
Beispiel: "MeineDatei.mdb" wird bei einem Upload am Dienstag mit dem Dateiname "2_MeineDatei.mdb" hochgeladen.

Auf diese Weise ist es möglich, eine 7 Tage Sicherung zu realisieren, wenn die Anwendung täglich mit dem Taskmanager startet.

Hier nun der Code für den Upload:

Private Sub Form1_Load(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles MyBase.Load
 
  ' lokales Verzeichnis, in dem sich die Datei befindet,
  ' die hochgeladen werden soll
  Dim sLocalPath As String = "c:\ordner\"
  Dim sLocalFile As String = "MeineDatei.mdb"
 
  ' FTP-Server
  Dim sFTPHost As String = "ftp://meine-domain.de/"
 
  ' Benutzername und Kennwort für den Server-Zugriff
  Dim sUserName As String = "MeinBenutzername"
  Dim sPassword As String = "MeinPasswort"
 
  ' Datei wie UploadFile-Methode hochladen
  My.Computer.Network.UploadFile(sLocalPath & sLocalFile, _
    sFTPHost & My.Computer.Clock.LocalTime.DayOfWeek & "_" & sLocalFile, _
   sUserName, sPassword, True, 500, FileIO.UICancelOption.DoNothing)
End Sub