次のコードは、filezilla に比べて非常に遅いです (コードのアップロードは約 100 kbps、filezilla は 28 Mbps)。
Private Sub UploadFTP(ByVal Datei As String, ByVal Dateiname As String, ByVal Ftp As String, ByVal Benutzername As String, ByVal Passwort As String)
Try
' WebClient
ftpUpload = New Net.WebClient
' URL mit Zieldatei
Dim url As String = Ftp & IIf(Ftp.EndsWith("/"), "", "/") & Dateiname
' Anmeldedaten am FTP-Server
ftpUpload.Credentials = New Net.NetworkCredential(Benutzername, Passwort)
' Datei asnychron uploaden
ftpUpload.UploadFileAsync(New Uri(url), Datei)
Catch ex As Exception
TextBox1.Text = TextBox1.Text & ex.ToString & vbNewLine
End Try
End Sub
数時間グーグルで調べた後、正しい方向を示すものを見つけることができませんでした。アップロードが遅いのはなぜですか?どうすれば速度を上げることができますか?
編集
バッファの問題だと思います。しかし、バッファを増やす方法が見つかりませんでした。
ありがとう