Lire code HTML dans IE7

Bonjour,

J'utilise Internet Explorer 7 et je n'arrive plus a faire tourner un petit code qui me permettait de lire le code HTML d'une page, ceci sur IE 5:

Code:

---

1 2 3 4 5 6 7 8

dim str as string Set IE = CreateObject("InternetExplorer.Application") IE.navigate "www.mapage.com" Do Until IE.readyState = READYSTATE_COMPLETE DoEvents Loop 'attendre la fin du chargement   str = IE.Document.body.innerHTML

---

Il me renvoie l'erreur 91 sur la ligne str=IE.Document.body.innerHTML:

Citation:

---

Variable objet ou variable de bloc With non définie

---

Si qq1 a une idée...

Je n'ai toujours pas de solution à mon problème. J'ai essayé d'installer une version anterieure d'Internet Explorer mais je me casse aussi les dents dessus.
lorsque j'installe la version 6 par exemple, il me dit qu'il détecte une version superieure installée et annule l'installation. Je sais pas trop comment virer IE7...
Merci de votre aide !!!

salut timoth,

cela m'interesse aussi, j'ai donc fait à partir de ton code ;), ca:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Dim IE As InternetExplorer Dim str As String   Set IE = New InternetExplorer IE.Navigate "www.mapage.com" Do Loop Until (IE.ReadyState = READYSTATE_COMPLETE) And Not (IE.Busy)   str = IE.Document.body.innerHTML   MsgBox str   Set IE = Nothing

---

qui fonctionne avec mon IE 6.0.2900.2180.xpsp_sp2_rtm...

Merci de ton aide!!

Donc, ça marche avec IE6. Mon pb est que je travaille avec IE 7 et que ça ne marche plus (peut etre à cause des onglets?)

Je n'arrive pas à revenir à IE6. Lorsque je veux l'installer, il me dit que j'ai une version plus récente et il stoppe l'installation. Comment puis-je me débarrasser de ma version????

tu as essayé à la barbare?
effacement du dossier en mode sans echec puis un nettoyeur de base de registre?
enfin ce serait mieux de pouvoir trouver une solus avec IE7.
j'essaierais bien mais si tu dis que ca marche pas, ca me dis pas trop de l'installer, et de plus pouvoir le retirer...:mouarf:

Bonsoir,

Si c'est juste pour récupérer le texte d'une page web, voir méthode de la bibliothèque XML

A+

bonsoir,

j'ai poussé mes recherches sur l'appel d'une page:
mettre une valeur et la transmettre la demande. j'ai trouvé plusieurs code sur codesource, developpez, et des infos sur l'objet InternetExplorer sur microsoft mais cela ne marche pas.

pourriez vous m'écourter mes recherches? merci.

Bonjour,

Et le travail de Maxence :Pièce jointe 20607

Cordialement.

ps: en modifiant MSXML2.ServerXMLHTTP50 par la version installée dans la référence, respectivement:
MSXML2.ServerXMLHTTP30, MSXML2.ServerXMLHTTP40, MSXML2.ServerXMLHTTP60...;)

ps:j'ai résolu mon pb. c'était un pb de session...:aie:

bon, j'ai essaié avec IE7: pas de pb.