Benjamin wrote:

Hi,
In my browser i use this code to see the size of the loaded internetpage:
Dim strHTML As String
Private Sub Command1_Click()
strHTML = MozillaBrowser1.document.body.innerText
Label1.Caption = strHTML
End Sub
Private Sub Form_Load()
MozillaBrowser1.navigate "www.google.be <http://www.google.be>"
End Sub
I have the mshtml.tlb in the references and the mozillalibrary.
With the IE OCX this works.
Wat's the problem?
Thanx a lot,
Benjamin

Hi Benjamin,

I think it is because you have to write:
Private Sub Command1_Click()
        dim elt as IHTMLElement, doc as IHTMLDocument
        Set doc = MozillaBrowser1.document
        Set elt = doc.body
        strHTML = elt.innerText
        Label1.Caption = strHTML
End Sub

I think it is because we don't implement the DispHTMLGenericElement interface, which is marked as [default] in MsHtml.idl.
I didn't get it at ounce, because I use a MozillaHtml.idl to get events from elements and the document, and I have IHTMLElement and IHtmlDocument marked as [default] therein).


Alex
_______________________________________________
mozilla-embedding mailing list
[EMAIL PROTECTED]
http://mail.mozilla.org/listinfo/mozilla-embedding

Reply via email to