probleme Manipulation d'Internet Explorer via VBA

Bonjour ou Bonsoir à tou(te)s
Après avoir lu le topic de stéphane :
http://www.developpez.net/forums/d11...lorer-via-vba/

Je l'ai testé pour atteindre un autre site que Google,
la page d'accueil se charge bien et à fond, mais je me retrouve en Bug juste après sur mon programme (déjà expliqué sur le lien ci-dessus), voici dans l'ordre avec un point d'arrêt et une fenêtre espion, le résultat :
1ere image au point d'arret avec contenu de la fenetre espion
2eme image, suite et message d'erreur + nouveau contenu de la fenetre espion
merci d'avance pour vos conseils avisés

Bonne soirée

Salut

Visiblement le soucis vient du contenu de la variable IE, pas de IEDoc.

Je vois sur ton environnement VB que tu as pas mal de modules complémentaires chargés, dont un qui se rapporte a Internet. Peut-être que celui-ci déclare une autre version de type InternetExplorer.
Essai de forcer vb à prendre le bon en modifiant la déclaration d'IE comme suit

Code:

---

Dim IE As New SHDocVw.InternetExplorer

---

As-tu essayé avec d'autres sites pour voir si le contenu d'IE était correct? Il faudrait faire l'essai avec une site sécurisé (https://) et un non sécurisé (http://).


++
Qwaz

Bonjour le forum, Stephane,

Je te cofirme que j'ai la dernière version IE, je vais essayer ce que tu proposes, mais à l'envers :
D'abord prendre un site non sécurisé car mon choix l'était
ensuite essayer ta propo :

Code:

---

Dim IE As New SHDocVw.InternetExplorer

---

Bonne journée et merci encore

J'ai donc tout essayé, avec chaque déclaration

Code:

---

Dim IE As New SHDocVw.InternetExplorer

---

ou

Code:

---

Dim IE As New InternetExplorer

---

et des sites sécurisés ou non
un seul (sécurisé) ne m'a pas engendré l'erreur VBA (citée plus haut) et j'ai même pu voir l'arborescence IE au niveau de la fenêtre espion.

Tout cela n'est pas grave pour moi, j'ai tenté l'expérience afin de satisfaire ma curiosité.

Je conseille tout de même vivement à tou(te)s ceux ou celles intéressé(e)s par la manipulation d'internet dans les macros de lire le topic de Stéphane (Qwazerty)
http://qwazerty.developpez.com/tutor...-et-vba-excel/

Merci Stéphane,

Bonne journée à tou(te)s

Bonjour à tou(te)s, Stéphane,

Après un autre essai sur un autre PC, sur un lieu différent, je ne rencontre plus aucun problème, donc je pense revoir la config d'nternet explorer chez moi.

Bonne continuation,

Cordialement

bonsoir a tout les deux

je suis en train de travailler justement sur une application utilisant la librairie "IE" dont quazerty m'a beaucoup aidé

et en fait il se trouve que ie9 pose beaucoup de probleme avec la librairie
j'ai moi meme une instabilité du code malgré qu'il n'y ai aucune erreurs

d'un jour a l'autre le code fonctionne ou pas et justement au niveau de "iedoc"
et parfois je remplace waitie par la fonction "sleep" et ca marche mais bon ca n'est pas propre



[PS pour quazerty] tu n'a pas dis ce que tu en pensais sur l'alternative que j'avais trouvé en utilisant une autre librairie"Microsoft.XMLHTTP"


exemple recuperant le texte(source) de la page

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Function GetXml(sURL) Dim Xml Set Xml = CreateObject("Microsoft.XMLHTTP") Xml.Open "GET", sURL'(sURL etant le lien ) Xml.send Do DoEvents Loop While Xml.readyState <> 4'similaire a waitie GetXml = Xml.responseText   End Function

---