Discussion :

[vallier]

Bonjour à tous,

Je travaille dans le hardware en microcontroleurs et n'ai pas les outils ni le savoir en programmation alors j'aimerais un petit coup de main.

Il me serait utile d'avoir une macro sous forme d'un xxx.exe qui me teste l'affichage d'une page web demandée et qui me redonne la main quand elle est affichée completement. On m'a dit que ça se faisait par " do while IE.Readystate <> 4 puis Loop " e.t.c. en VB mais on a pas réussit à me le faire.
Je reprécise que je n'ai pas les outils pour développer alors si quelqu'un qui a un peu de temps pouvait me faire la source et le .exe, je lui en serait reconnaissant.
Pour info vous pouvez me contacter pour des problèmes liés à la programmation et à la mise en oeuvre des microcontroleurs, je vous répondrai volontier.
Merci d'avance

[jmfmarques]

une macro sous forme d'un xxx.exe

Hum !...

[SfJ5Rpw8]

et ta macro xxx.exe ..? tu ve qu'elle fasse quoi au juste ? tester l'existence d'une page Web... ? et elle doit faire quoi du résultat ? afficher un messagebox.. ?

soit plus clair SVP...


Sans outils de programmation tu as toujours le VBScript ...

[vallier]

Salut Bbil,

Ce que j'aimerais c'est qu'elle reste en boucle jusqu'a ce que la page web qui a été demandée soit affichée totalement ( "terminé" dans la barre en bas de IE )
afin que toutes les infos de la page soient disponibles.

actuellement, je suis obligé de mettre une tempo pour attendre l'affichage complet et si le site met du temps à répondre forcément ça plante.

en résumé :

1 - Appel de la page
2 - Appel de la macro qui boucle
3 - La macro detecte page affichée ( readystate_complete )donc stoppe sa boucle
4 - Sortie de la macro

[SfJ5Rpw8]

tiens à mettre dans un fichier .VBS :

Code :

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

1
2
3
4
5
6
7
8
9
 
Dim IE
Set IE = Wscript.CreateObject("InternetExplorer.Application")
IE.Visible = 1
IE.navigate "http://www.developpez.net"
Do While (IE.Busy)
	WScript.Sleep 10
Loop
WScript.echo "Chargement Terminé"

[SilkyRoad]

bonjour

tu trouveras plusieurs exemples en utilisant le moteur de recherche du site

http://www.developpez.net/forums/sho...=IE.Readystate

http://www.developpez.net/forums/sho...=IE.Readystate


bonne journée
michel

[vallier]

OUAHH ! Quel plaisir de rencontrer des personnes aussi dynamiques !

Mille mercis pour ta réponse. Je vais immédiatement me renseigner sur VBscript

Je te tiens au courant.

Très bonne journée à toi