Bonsoir,
j'ai crée un programme Telecharger le fichier zip et extraire un fichier dans le fichier zip.
Voici une partie de mon code
mon problème avec OpenReadTaskAsync, j'arrive pas avoir le chargement du fichier zip avec un progressbar1.value.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 AddHandler wbclient.DownloadProgressChanged, AddressOf client_ProgressChanged Dim data As Stream = Await wbclient.OpenReadTaskAsync(New Uri(URL)) Using archive As ZipArchive = New ZipArchive(data) ...etc Private Sub client_ProgressChanged(sender As Object, e As DownloadProgressChangedEventArgs) ProgressBar1.Value = e.ProgressPercentage End Sub
pouvez-vous m'aider comment faire avoir chargement du fichier zip avec un progressbar1?
Merci de votre réponse.
Partager