Detect when webbrowser document is fully loaded

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

Hi,

I'm trying to get the event of the webbrowser control that indicates it's fully loaded...

...after All iframes, & everything else in the browser document is done loading.

Each frame in a document triggers cjBrowser1_DocumentComplete when it's done loading, so

the following attempts to compare the frame that triggered DocumentComplete to the parent browser window.

If it matches, then it will set xWebB3Done to True.

I've tried :

(xWebB3Done is set to False before cjBrowser1 navigates)

Private Sub cjBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

    If (pDisp Is cjBrowser1.Object) Then
        xWebB3Done = True <================<< this is NEVER hit no matter what.
        ' Finished Loading
    Else
        ' Do nothing
    End If

End Sub

cjBrowser1_DocumentComplete is fired several times during a single page load.

pDisp say's it's "Microsoft Web Browser Control" at each, & every firing of a single page load.

What else can I do? 

(VB6 on Vista)

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
DTeCH Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 13 August 2009 Status: Offline Points: 6	Post Options Post Reply Quote DTeCH Report Post Thanks(0) Quote Reply Topic: Detect when webbrowser document is fully loaded Posted: 01 June 2010 at 5:30pm
	Hi, I'm trying to get the event of the webbrowser control that indicates it's fully loaded... ...after All iframes, & everything else in the browser document is done loading. Each frame in a document triggers cjBrowser1_DocumentComplete when it's done loading, so the following attempts to compare the frame that triggered DocumentComplete to the parent browser window. If it matches, then it will set xWebB3Done to True. I've tried : (xWebB3Done is set to False before cjBrowser1 navigates) Private Sub cjBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) If (pDisp Is cjBrowser1.Object) Then xWebB3Done = True <================<< this is NEVER hit no matter what. ' Finished Loading Else ' Do nothing End If End Sub cjBrowser1_DocumentComplete is fired several times during a single page load. pDisp say's it's "Microsoft Web Browser Control" at each, & every firing of a single page load. What else can I do? (VB6 on Vista)