Probleme mit getElementsByTagName unter VB6

[Andreas]

Hallo,

ich möchte in VB6 eine HTML-Seite nach Elementen durchsuchen.
Dafür gibt's die Methode getElementsByTagName.
Im Object-Browser wird als Rückgabewert der Funktion IHTMLElementCollection angegeben, also ein Interface. Im Object-Browser gibt's jetzt auch eine Klasse HTMLElementCollection, die - wie ich meine - das obige Interface implementieren müsste.

Habe also folgendes versucht:

Dim doc As HTMLDocument
    Dim elements As HTMLElementCollection

Set doc = WebBrowser1.document
    Set elements = doc.getElementsByTagName("meta")

Beim Ausführen bekomme ich einen Laufzeitfehler 13: Typen unverträglich. Liegt an der Zuweisung in der letzten Zeile.

Also andere Strategie:

Dim doc As HTMLDocument
    Dim elements As Object
    Dim name as String

Set doc = WebBrowser1.document
    Set elements = doc.getElementsByTagName("meta")
    name = TypeName(elements)

Für name erhalte ich dann DispHTMLElementCollection. Diesen Dispatcher finde ich im Object-Browser aber nicht.

Und jetzt eben die Frage: Wie komme ich über die Funktion getElementsByTagName an das "Result Set", auf dem ich dann ggf. weitere Suchabfragen laufen lassen kann ?
In .Net geht's ja scheinbar auch. Da funktioniert das obige Beispiel. Aber wie geht's unter VB6 ?

Danke für eure Hilfe !

Grüße,
Andreas