question about WebBrowser control?

[ghostshadow189]

I've VB6 code like that :

WebBrowser1.Document.All("username").Value = "my_username"
WebBrowser1.Document.All("passwd").Value = "my_password"
WebBrowser1.Document.Forms(0).Submit
 
WebBrowser1.Navigate "http://360.yahoo.com"

So in this code , it'll navigate http://360.yahoo.com before the form is submit to login . So how can I make it navigate another page after the form is already submited and all the page is loaded ?

[tommygrayson]

I've VB6 code like that :

WebBrowser1.Document.All("username").Value = "my_username"
WebBrowser1.Document.All("passwd").Value = "my_password"
WebBrowser1.Document.Forms(0).Submit
 
WebBrowser1.Navigate "http://360.yahoo.com"

So in this code , it'll navigate http://360.yahoo.com before the form is submit to login . So how can I make it navigate another page after the form is already submited and all the page is loaded ?

In the WebBrowser1 DocumentComplete add:

If Redirected = False Then
     WebBrowser1.Navigate "http://gotosomewheresite.com"
End If

Hope that helps.

[ghostshadow189]

thanx , but what's Redirected variable ?

[Hack]

thanx , but what's Redirected variable ?

Where is that coming from?

[ghostshadow189]

can u explain more clearly? i c that there no Redirected property of WebBrowser ?

[tommygrayson]

can u explain more clearly? i c that there no Redirected property of WebBrowser ?

Redirect is the variable that will stop the browser from doing an infinite navigation.

In other words:

Put the code below in your Form_Load:

Dim Redirected as Boolean
Redirected = False

Then in your WebBrowser1_DocumentComplete event put the code below:

If Redirected = False Then
     WebBrowser1.Navigate "http://gotosomewheresite.com"
     Redirected = True
End If