Hollosi Information eXchange /HIX/
HIX CODER 2129
Copyright (C) HIX
2004-08-22
Új cikk beküldése (a cikk tartalma az író felelőssége)
Megrendelés Lemondás
1 weblap, Excel VBA (mind)  19 sor     (cikkei)

+ - weblap, Excel VBA (mind) VÁLASZ  Feladó: (cikkei)

Sziasztok!
A lenti alprogrammal szeretnék weblapot beolvasni Excel 2003 VBA-ban.
Működik ugyan, de a Set Dokumentum sornál hibával megáll. (Method
'Document' of object 'IWebBrowser2' failed) Ha a Debug gombbal
továbbengedem, akkor az MsgBox rendesen kiírja a weblapot. Mi lehet a
hiba oka? Talán a hivatkozás hiányzik? Mármint amit a Tools,
References menüpontban kell megadni. Ha igen, melyik tartalmazza az
IWebBrowser2-t?

Sub WeblapOlvasás()
Dim Böngésző As Object: Dim Dokumentum As Object
Set Böngésző = CreateObject("InternetExplorer.Application")
Böngésző.Navigate "http://www.hix.hu/"
Set Dokumentum = Böngésző.Document
MsgBox Dokumentum.Body.innerText
Set Dokumentum = Nothing: Set Böngésző = Nothing
End Sub ' WeblapOlvasás

Köszönet.

AGYKONTROLL ALLAT AUTO AZSIA BUDAPEST CODER DOSZ FELVIDEK FILM FILOZOFIA FORUM GURU HANG HIPHOP HIRDETES HIRMONDO HIXDVD HUDOM HUNGARY JATEK KEP KONYHA KONYV KORNYESZ KUKKER KULTURA LINUX MAGELLAN MAHAL MOBIL MOKA MOZAIK NARANCS NARANCS1 NY NYELV OTTHON OTTHONKA PARA RANDI REJTVENY SCM SPORT SZABAD SZALON TANC TIPP TUDOMANY UK UTAZAS UTLEVEL VITA WEBMESTER WINDOWS