[R] Fonction _IELoadWait => PB sous Vista
Posté : dim. 25 janv. 2009 12:14
Bonjour,
j'essais en vain de modifier un tout petit peu l'exemple de la fonction _IELoadWait
en allant sur le site de google et j'obtient une erreur, comme quoi la fonction n'a pas pu être appliquéeà l'objet. J'aimerais au passage savoir pour quelle version de IE cet UDF a été développé. Car j'ai la légère impression que certaine fonction ne semblent pas très à l'aise avec IE7. Je m'explique lorsque par exemple on modifie les 2eme et 3eme paramètres de la fonction IECreate l'UDF nous sort deux fenêtres IE une vide et l'autre contenant la page web demandée. (PS: je suis sous vista je ne suis pas sur que ceci est un rapport...) Bref je suppose que cela engendre quelques petits problèmes vis à vis de la librairie.
Voici le code que j'ai modifié:
j'essais en vain de modifier un tout petit peu l'exemple de la fonction _IELoadWait
en allant sur le site de google et j'obtient une erreur, comme quoi la fonction n'a pas pu être appliquéeà l'objet. J'aimerais au passage savoir pour quelle version de IE cet UDF a été développé. Car j'ai la légère impression que certaine fonction ne semblent pas très à l'aise avec IE7. Je m'explique lorsque par exemple on modifie les 2eme et 3eme paramètres de la fonction IECreate l'UDF nous sort deux fenêtres IE une vide et l'autre contenant la page web demandée. (PS: je suis sous vista je ne suis pas sur que ceci est un rapport...) Bref je suppose que cela engendre quelques petits problèmes vis à vis de la librairie.
Voici le code que j'ai modifié:
Code : Tout sélectionner
; *******************************************************
; Example 1 - Open browser with basic example, get link collection,
; loop through items and display the associated link URL references
; *******************************************************
;
#include <IE.au3>
$oIE = _IECreate ("http://www.google.com", 0, 0, 0)
;$oIE = _IE_Example ("basic")
_IELoadWait ( $oIE, 2000, 8000)
$oLinks = _IELinkGetCollection ($oIE)
$iNumLinks = @extended
MsgBox(0, "Link Info", $iNumLinks & " links found")
For $oLink In $oLinks
MsgBox(0, "Link Info", $oLink.href)
Next
