Explication sur WebBrowser

J

Jon

Guest

• 13 Août 2004

• #2

with webbrowser1
if .readystate=readystate_complete then msgbox "chargé"
end with

 

Vote positif 0 Vote négatif

M

Minick

Guest

• 13 Août 2004

• #3

Salut Jon,

Merci de ton aide mais ca ne regle pas mon probleme

ReadyState ne se met pas a jour sauf en pas a pas

@+ Minick

 

Vote positif 0 Vote négatif

M

Minick

Guest

• 13 Août 2004

• #4

re,

petite precision.

Les 2 methode fonctionnent (la mienne et celle de Jon)

Mon probleme est de lire la valeur de .Busy ou .ReadyState via ma boucle
ce qui me permettrai de savoir des que ma page est chargé completement.

Si j'attend que la page soit chargé, la pas de probleme je recupere ce que je veux mais je ne veux pas mettre de tempo pour limiter le temps d'execution.

voila j'espere avoir été un peu plus clair

@+ Minick

 

Vote positif 0 Vote négatif

M

michel

Guest

• 13 Août 2004

• #5

bonsoir Minick , bonsoir Jon

tu peux essayer

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
MsgBox "chargé"
End Sub

testé avec WinXP et Excel2002


bonne soiree
MichelXld

 

Vote positif 0 Vote négatif

M

Minick

Guest

• 13 Août 2004

• #6

Bonsoir michel,

Effectivement comme cela pas de probleme non plus.

J'ai du nouveau, en fait le probleme vien du fait que j'ouvre mon Userform en non modal.

En modal pas de probleme.

Je vais donc faire avec

Merci pour votre aide

@+ Minick

 

Vote positif 0 Vote négatif

M

michel

Guest

• 13 Août 2004

• #7

bonsoir Minick

chez moi cela fonctionne que l'USF soit modal ou non modal : le message s'affiche quand le WebBrowser est chargé

peux tu tester le fichier joint ?


bonne soiree
MichelXld

 

Pièces jointes

• FinChargementWebBrowser.zip

  10.1 KB · Affichages: 270

Vote positif 0 Vote négatif

M

Minick

Guest

• 13 Août 2004

• #8

salut,

Bon ben en faite c'est une erreur de conception de ma part.

J'avais mi une boucle while apres l'ouverture du userform en non modal
et c'est elle qui pose probleme.

Avec DocumentComplete je peux faire ce que je veux donc
je vais continuer comme cela.

Merci michel de t'etre penché sur mon probleme qui n'en était pas un en fait

@+ Minick

 

Vote positif 0 Vote négatif