Discussion :

[Magum]

Bonjour,

Généralement, je règle mes problèmes grâce aux différentes contributions que je trouve par mon ami Google mais là, je bloque et j'en peux plus !

Dans un Form, j'ai un contrôle WebBrowser affichant des pages html. Des boutons contrôlent des Scripts Java interagissant avec les sites web. Un des boutons a pour but d'interroger certaines propriétés du webbrowser et la sub en question est exécutée via un thread.

Voici un code très simplifié mais générant l'erreur :

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
18
19
20
21
22
23
 
Imports System.Windows.Forms
Imports System.Threading
 
Public Class Bidon
    Inherits System.Windows.Forms.Form
 
    Private ThreadBcl As Thread
 
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.WebBrowser1.Navigate("http:\\bidon.com")
    End Sub
 
    Private Sub BoutonPropriete_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Slip.Click
        ThreadBcl = New Thread(AddressOf CaptBT)
        ThreadBcl.Name = "ThreadMoveBt"
        ThreadBcl.Start()
    End Sub
 
    Sub CaptBT()
        MsgBox(Me.WebBrowser1.IsBusy)
    End Sub
End Class

A l'issue de l'événement click du bouton "BoutonPropriete", j'ai une erreur de cast : "Le cast spécifié n'est pas valide." Si j'interroge une propriété d'un autre contrôle, il n'y a aucun problème...

Avez-vous déjà eu un cas similaire ? Des idées ???

Merci d'avance, Magum

[Pol63]

sur quelle ligne ca plante ?
(dans la plupart des cas ce message est sur un ctype ou un directcast)

[Magum]

ça plante sur :

Code :

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

1
2
 
MsgBox(Me.WebBrowser1.IsBusy)

[smyley]

et ça ça marche ?

Code :

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

MsgBox(Me.WebBrowser1.IsBusy.ToString)

[Magum]

non... J'ai également essayer des conversions de type avant de poster mais je n'ai rien trouvé...

[Pol63]

et si tu appelles CaptBT sans passer par un thread ca marche ?
que vaut Me.WebBrowser1.IsBusy.ToString ?

[Magum]

sans thread, ça fonctionne très bien.

Mais je ne crois pas pouvoir m'en passer. J'ai simplifié le code pour une meilleur lisibilité et plus de clarté mais logiquement, je boucle sur l'état (isBusy) du webbrowser pour détecter quand le chargement d'un webservice est terminé et agir en fonction. Sans thread, je ne crois pas pouvoir lancer la boucle d'un côté et laisser le webbrowser "vivre sa vie" de l'autre.

[smyley]

Essayes d'utiliser This.Invoke. Peut être que le webBrowser n'aime pas être chatouillé à partir d'un autre thread.
Donc tu crées une méthode et tout et tout pour obtenir la propriété voulue du webBrowser. En détail je ne sais pas je hais le vb, demande à sperot

[Magum]

Smyley, ton conseil a été le bon...

Voici donc le code qui fonctionne :

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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
Imports System.Windows.Forms
Imports System.Threading
 
Public Class Bidon
    Inherits System.Windows.Forms.Form
 
    Private ThreadBcl As Thread
    Private Delegate Sub WebBowserInvokeHandler() 
 
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.WebBrowser1.Navigate("http:\\bidon.com")
    End Sub
 
    Private Sub BoutonPropriete_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Slip.Click
        ThreadBcl = New Thread(AddressOf CaptDelegate)
        ThreadBcl.Name = "ThreadMoveBt"
        ThreadBcl.Start()
    End Sub
 
   Sub CaptDelegate()
        If WebBrowser1.InvokeRequired Then
            WebBrowser1.Invoke(New WebBowserInvokeHandler(AddressOf CaptBT))
        Else
            CaptBT()
        End If
   End sub
 
    Sub CaptBT()
        MsgBox(Me.WebBrowser1.IsBusy)
    End Sub
End Class

Merci à tous pour votre coup de main !!!

A+

[Pol63]

seul le thread principal peut modifier un controle, par contre en théorie on peut y lire des valeurs, enfin ca dépend de ce que fait la propriété, donc c'est plausible que le webbrowser.isbusy veut pas

peut etre que msgbox n'aime pas trop non plus ne pas etre appelé par un autre thread
pour ca essaye msgbox "bonjour" sur ton thread


pour ramener des traitements d'un thread vers le principal il y a une technique utilisant des delegués

à priori j'explique ca ici :
http://www.developpez.net/forums/d49...s/#post2980721

à adapter ...