Webbrowser Document Complete

[weirddemon]

I'm using a webbrowser control to pull some information from a website. It works fine.

I load the web page when the user clicks a button and then I pull the information from the site when the page completely loads. I have this bit of code in the DocumentComplete event.

I am doing this for two different websites. So, my code as it is, looks something likes this:

Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click
     WebBrowser1.Navigate("http://www.website.com")
        End If
 
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
 
            Dim q As String = WebBrowser1.Document.GetElementById("123").InnerText
            txtOne.Text = (q)
        End If

If I add a second Navigate to the same WebBrowser control, and then add another Document.GetElementById line, using different variables, it doesn't work.

Its obvious that it loads both sites and then it finishes. So, it never has time to finish the first load and then pull the info into the text box.

Is there a way to do this? To load the first site, pull the info, load the second site, then pull the info from there?

Thanks

[.paul.]

Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click     
      WebBrowser1.Navigate("http://www.website.com") 
      While Not WebBrowser1.ReadyState = WebBrowserReadyState.Complete         
            Application.DoEvents()
      End While       
      txtOne.Text = WebBrowser1.Document.GetElementById("123").InnerText            
End If

[weirddemon]

Thanks, Paul

[weirddemon]

I thought I had this resolved, but apparently I'm mistaken.

I put the code into two If statements that depend on the checked state of a check box.

I tried this:

If CheckBox1.Checked And CheckBox2.Checked = True Then
            WebBrowser1.Navigate("http://www.website.com")
            While Not WebBrowser1.ReadyState = WebBrowserReadyState.Complete
                Application.DoEvents()
            End While
            Dim q As String = WebBrowser1.Document.GetElementById("123").InnerText
            TextBox1.Text = (q)
        End If
 
        If CheckBox3.Checked And CheckBox4.Checked = True Then
            WebBrowser1.Navigate("http://www.website.com")
            While Not WebBrowser1.ReadyState = WebBrowserReadyState.Complete
                Application.DoEvents()
            End While
            Dim q As String = WebBrowser1.Document.GetElementById("456").InnerText
            TextBox2.Text = (q)
        End If

When I run the code, it loads the first item into the first box. After that, the code doesn't work.

I think it has something to do with the state of the webbrowser, but i'm not sure.

[sparrow1]

Hi,

Wouldn't be better to put these if statements in a select case statement.

[weirddemon]

It probably would be, Sparrow. I've just been using If statements since I started and I didn't want to learn select case because If statements have been working.

I didn't want to introduce something new and possibly have some more unknown problems.

But, I should probably get to it finally. I'll see what I come up with.

Thanks

[Half]

DocumentCompleted can fire multiple times and only the last time will be the real McCoy. You can get lost in your code where one DocumentCompleted is waiting for the While to finish and another DocumentCompleted gets raised, your code starts another Do...While and so on.

Try it with a simple If:
If WebBrowser1.ReadyState = WebBrowserReadyState.Complete Then
'your code

A simpler (lamer) way would be:

If WebBrowser1.ReadyState <> WebBrowserReadyState.Complete Then
Exit Sub
End If

'your code

[kleinma]

When DocumentCompleted fires, it also contains the URL in the eventargs for the page it just loaded. If it was a frame on the page it loaded, the URL will be specifically that frames URL, not the page you navigated to. When the event fires the final time, it should be for the actual URL you were navigated to.