Geldmann3
2010-01-28, 03:25:21
Ich habe einen FTP Dateiupload in Visual Basic erstellt. (Ich habe mir mehr oder weniger die Codeschnipsel dazu aus dem Internet besorgt.
Der wichtigste sieht so aus.
' lokales Verzeichnis, in dem sich die Datei befindet,
' die hochgeladen werden soll
Dim sLocalPath As String = Label1.Text
Dim sLocalFile As String = ""
' FTP-Server
Dim sFTPHost As String = "ftp://meinserver.bsp"
' Benutzername und Kennwort für den Server-Zugriff
Dim sUserName As String = "Anonymous"
Dim sPassword As String = ""
' Datei wie UploadFile-Methode hochladen
My.Computer.Network.UploadFile(sLocalPath & sLocalFile, _
sFTPHost & My.Computer.Clock.LocalTime.Second & "_" & sLocalFile, _
sUserName, sPassword, True, 500, FileIO.UICancelOption.DoNothing)
End Sub
Der Upload funktioniert auch wunderbar, jedoch hat die hochgeladene Datei immer den Name der aktuellen Sekunde in der ich sie hochlade. Ich möchte aber dass die Datei ihren original Namen beiberhält, wie kann ich dies erreichen?
Vielen dank schon mal für die Hilfe!
edit:
Dar der Dateiname auf dem Server immer der aktuellen Sekunde entspricht ging ich davon aus, dass der Name in diesem Codeschnipsel bestimmt wird.
Datei wie UploadFile-Methode hochladen
My.Computer.Network.UploadFile(sLocalPath & sLocalFile, _
sFTPHost & My.Computer.Clock.LocalTime.Second & "_" & sLocalFile, _
sUserName, sPassword, True, 500, FileIO.UICancelOption.DoNothing)
Ich änderte My.Computer.Clock.LocalTime.Second in Label1.Text jedoch bekam ich dann beim Uploadversuch eine Fehlermeldung. Was habe ich nicht verstanden? Was mache ich falsch?
----------------
So funktioniert der Upload auch
My.Computer.Network.UploadFile( _
OpenFileDialog1.FileName, _
"ftp://meinServer.bsp/MeineDatei.jpg", "Anonymous", "")
Jedoch heisst die Datei dann immer MeineDatei.jpg, wie kann ich den Original Dateinamen beiberhalten?
Der wichtigste sieht so aus.
' lokales Verzeichnis, in dem sich die Datei befindet,
' die hochgeladen werden soll
Dim sLocalPath As String = Label1.Text
Dim sLocalFile As String = ""
' FTP-Server
Dim sFTPHost As String = "ftp://meinserver.bsp"
' Benutzername und Kennwort für den Server-Zugriff
Dim sUserName As String = "Anonymous"
Dim sPassword As String = ""
' Datei wie UploadFile-Methode hochladen
My.Computer.Network.UploadFile(sLocalPath & sLocalFile, _
sFTPHost & My.Computer.Clock.LocalTime.Second & "_" & sLocalFile, _
sUserName, sPassword, True, 500, FileIO.UICancelOption.DoNothing)
End Sub
Der Upload funktioniert auch wunderbar, jedoch hat die hochgeladene Datei immer den Name der aktuellen Sekunde in der ich sie hochlade. Ich möchte aber dass die Datei ihren original Namen beiberhält, wie kann ich dies erreichen?
Vielen dank schon mal für die Hilfe!
edit:
Dar der Dateiname auf dem Server immer der aktuellen Sekunde entspricht ging ich davon aus, dass der Name in diesem Codeschnipsel bestimmt wird.
Datei wie UploadFile-Methode hochladen
My.Computer.Network.UploadFile(sLocalPath & sLocalFile, _
sFTPHost & My.Computer.Clock.LocalTime.Second & "_" & sLocalFile, _
sUserName, sPassword, True, 500, FileIO.UICancelOption.DoNothing)
Ich änderte My.Computer.Clock.LocalTime.Second in Label1.Text jedoch bekam ich dann beim Uploadversuch eine Fehlermeldung. Was habe ich nicht verstanden? Was mache ich falsch?
----------------
So funktioniert der Upload auch
My.Computer.Network.UploadFile( _
OpenFileDialog1.FileName, _
"ftp://meinServer.bsp/MeineDatei.jpg", "Anonymous", "")
Jedoch heisst die Datei dann immer MeineDatei.jpg, wie kann ich den Original Dateinamen beiberhalten?