vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#

https://www.vbarchiv.net
Rubrik: HTML/Internet/Netzwerk · Internet / Browser / IE   |   VB-Versionen: VB.NET29.12.06
FTP-Upload mit VB.NET 2005

Einfache Möglichkeit zum Uploaden von Dateien per FTP mit Benutzername und Passwort

Autor:   Stefan RembergBewertung:  Views:  28.983 
www.mdb-tools.deSystem:  WinNT, Win2k, WinXP, Vista, Win7, Win8, Win10 Beispielprojekt auf CD 

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



Anzeige

Kauftipp Unser Dauerbrenner!Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv  Vol.6
(einschl. Beispielprojekt!)

Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
- nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
- Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.
 
 
Copyright ©2000-2021 vb@rchiv Dieter OtterAlle Rechte vorbehalten.


Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.