Guten Tag,
ich möchte aus einem VB6.0-Programm den InternetExplorer 7 aufrufen, mir eine bestimmte Internetseite anzeigen und mir melden lassen, wann die Seite fertig geladen ist. Zur Laufzeit bekomme ich immer den Fehler „Laufzeitfehler 430 Klasse unterstützt keine Automatisierung oder unterstützt erwartete Schnittstelle nicht“ . Der Verweis auf Microsoft Internet Controls shdocvw.dll ist vorhanden. Was muss ich tun, damit das Programm endlich läuft? Bitte möglichst detailliert, da ich noch nicht sooo fit mit VB bin.
hier noch ein wenig Sourcecode:
in der Klasse classIE:
Dim WithEvents mobjIE As InternetExplorer
Public Sub Class_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
MsgBox URL, , „navigate Complete“
mblnComplete = True
End Sub
Public Sub Class_Initialize()
mobjIE = New InternetExplorer