VP Windows APP go to web page and fill out form ( HALP! )

[MrKovacic]

hi all.. me again

I am so close with this one.. and i know its simple, but i am a n00b.

Here is the code I have so far...

Public Class Form1

    Private Sub submit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles submit.Click
        WebBrowser1.Navigate("http:my address")
        status.Text = "LOADING PAGE"
        'this is where i want to put a pause so the form can load and change the status to "FILLING OUT FORM"
        With WebBrowser1
            WebBrowser1.Document.defaultformname.umxusernametochangepwd.value = "mkovacic"
            'Document.defaultformname.submit()
            ' status.Text = "FORM SUBMITTED"
        End With

    End Sub
End Class

I cant get the form to wait untill the page is loaded to start trying out the form args..

anyone know a simple way to do this?

Thanks in advance!!


Thank you!!!

Mike Kovacic

 

[cjelec]

You could use the NavigateComplete2 event, this will fire when the page has fully loaded. Example:

Private Sub WebBrowser1_NavigateComplete2(ByVal sender As Object, ByVal e As AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event) Handles WebBrowser1.NavigateComplete2

        With WebBrowser1
            WebBrowser1.Document.defaultformname.umxusernametochangepwd.value = "mkovacic"
            'Document.defaultformname.submit()
            ' status.Text = "FORM SUBMITTED"
        End With
End Sub

Hope this helps

 

[MrKovacic]

I tried the code next to mine and i got the following..

Thank you!!!

Mike Kovacic

 

[cjelec]

Hi,

Sorry I use 2003 which comes with the axBrowser control.

For 2005 and above, I think you will need to use this event:

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, _
    ByVal e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted

    WebBrowser1.Document.GetElementById("umxusernametochangepwd").InnerText = "mkovacic"
    'The following line should click the Submit button,
    'You will need to find the name of the submit button and put it in the code below:
    'WebBrowser1.Document.GetElementById("SubmitButtonName").InvokeMember("Click")
    ' status.Text = "FORM SUBMITTED"
End Sub

Hopefully this will work,

If there are any problems (I can't test the code so there maybe), The following links should help you:

Submit button:

http://forums.microsoft.com/MSDN/ShowPost.aspx?PostID=869721&SiteID=1

WebBrowser Object:

http://msdn2.microsoft.com/en-us/library/system.windows.forms.webbrowser_members.aspx

HtmlDocument Object:

http://msdn2.microsoft.com/en-us/library/system.windows.forms.htmldocument_members.aspx