Discussion :

[Miska59]

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

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

mon problème avec OpenReadTaskAsync, j'arrive pas avoir le chargement du fichier zip avec un progressbar1.value.
pouvez-vous m'aider comment faire avoir chargement du fichier zip avec un progressbar1?

Merci de votre réponse.