Upload via FtpWebRequest avec ProgressBar
Bonjour, je suis nouveau sur le forum, et debutant en VB.NET
Je suis sur un programme d'upload en ce moment, qui fonctionne via FTP
Voila le code source de l'upload, qui est evidamment en BackgroundWorker.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
Try
Dim request As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://xxxxxx" & picname), System.Net.FtpWebRequest)
request.Credentials = New System.Net.NetworkCredential("xxxxxx", "xxxxxx")
request.Method = System.Net.WebRequestMethods.Ftp.UploadFile
Dim File() As Byte = System.IO.File.ReadAllBytes(imgpath.Text)
Dim UpFile As System.IO.Stream = request.GetRequestStream()
UpFile.Write(File, 0, File.Length)
UpFile.Close()
UpFile.Dispose()
MessageBox.Show("File(s) uploaded successfully", "Done", MessageBoxButtons.OK, MessageBoxIcon.Information)
Catch ex As Exception
If MessageBox.Show("Error Connecting To FTP," & vbNewLine & "Please try again", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error) _
= Windows.Forms.DialogResult.Retry Then
Exit Sub
End If
End Try |
Ce code fonctionne tres bien, mais je n ai vraiment aucune idee de la marniere de m y prendre pour renvoyer l'avancement de l upload a via BackgroundWorker1.ReportProgress( que dois-je inserer pour envoyer l avancement de l upload ?)
Merci infiniment a ceux qui prendront la peine de me repondre, je cherche comme un fou depuis des heures sur le net (en fait j y ai meme passe la nuit xD) mais rien a faire.
Merci
