Discussion :

[Mario Rousson]

Bonjour à tous

j'aimerais vérifier plusieurs pageweb les unes après les autres dans une boucle for each mais comment faire une pause dans la boucle le temps d'un sub WebBrowser1_DocumentCompleted

voici mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
For Each qu2 As String In QueueTor.Dequeue
                    WebBrowser1.Navigate("http://actions.lesaffaires.com/invest/investSQL/gx_f.stock_today?pi_symbol=" & qu2 & "-T")
                                    Next
 
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        Dim allelements As HtmlElementCollection = WebBrowser1.Document.All
        For Each webpageelement As HtmlElement In allelements
            Dim monStr As String = webpageelement.GetAttribute("HREF")
            If monStr.Contains("company_prof") Then
                Console.WriteLine(monStr)
            End If
        Next
            End Sub

Donc, je voudrais que ma boucle for each qu2 ...laisse le temps au WebBrowser1_DocumentCompleted de faire son travail

merci de vos suggestions

mario

[Chapeau_Bas]

Bonjour,

Que penses tu de:
Thread.Sleep("Temps en millisecondes")

Peut être avec un truc comme sa par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
            'Vérifie que le navigateur charge un nouveau document
            While Navigateur.IsBusy = True
                'Dans ce cas, pause de 5 secondes puis revérification
                Threading.Thread.Sleep(5000)
            End While

Bonne journée.

[Mario Rousson]

ouais je vais vérifier cette possibilité merci beaucoup

[Mario Rousson]

Ouin, pourquoi se compliquer la vie quand c'est si symple

j'ai placé ma routine de webbrowser.navigate dans un sub et je fais seulement appeler cette routine à la fin du WebBrowser1_DocumentCompleted

merci