Na mit dem element wo du was hochladen willst.
Button oder so, lösch deinen kram raus, nimm meine methode und trag deine einlogg daten etc ein.
Code:
Dim sLocalPath As String = "c:\ordner\" 'Hier der ordner indem die datei ist
Dim sLocalFile As String = "MeineDatei.mdb" 'Hier die datei wo in diesem ordner ist und du hochladen möchtest
Dim sFTPHost As String = "ftp://meine-domain.de/" 'Hier die adresse
Dim sUserName As String = "MeinBenutzername" 'Hier login name
Dim sPassword As String = "MeinPasswort" 'Hier login passwort
My.Computer.Network.UploadFile(sLocalPath & sLocalFile, sFTPHost & My.Computer.Clock.LocalTime.DayOfWeek & "_" & sLocalFile, sUserName, sPassword, True, 500, FileIO.UICancelOption.DoNothing)