Bonsoir,

j'arrive pas telecharger multiple file par rapport URL avec webclient. j'arrive a telecharger que le premier fichier.

URL : https://archive.org/download/WiiWare...ionByGhostware

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
...etc
Private Sub download(sender As Object, e As DownloadStringCompletedEventArgs)
        Try
            Dim result As String = e.Result
            ListView1.Items(LV.Item(sender).Index).ToolTipText = result
            ListView1.Items(LV.Item(sender).Index).SubItems(1).Text = "Chargement en cours..."
            ListView1.Items(LV.Item(sender).Index).SubItems(1).ForeColor = Color.Green
            ListView1.Items(LV.Item(sender).Index).Text = Regex.Match(result, "\<a href=(.*?)\>(.*\.wad)\<\/a\s*?\>").Groups.Item(2).Value
            Using X As New WebClient
                AddHandler X.DownloadFileCompleted, AddressOf Complete2
                AddHandler X.DownloadProgressChanged, AddressOf Progress
                X.DownloadFileTaskAsync(New Uri(TextBox1.Text & "/" & Regex.Match(ListView1.Items(LV.Item(sender).Index).ToolTipText, "\<a href=(.*?)\>(.*\.wad)\<\/a\s*?\>").Groups.Item(2).Value), TextBox2.Text & "\" & ListView1.Items(LV.Item(sender).Index).Text)
                LV.Add(X, ListView1.Items(LV.Item(sender).Index))
            End Using
        Catch ex As Exception
        End Try
    End Sub
Pouvez-vous m'aider telecharger plusieurs fichier par rapport URL. merci