Breadcrumbs

[muttley1968]

Hello.

I am attempting to make a tiny little program for a college challange to auto fill in a form online i have done fine with text using this code but now i have to select an item from a combobox and i attempted to do it in the same manior with the code below

Code: Select all

        Dim buying As HtmlElement = WebBrowser1.Document.All.Item("type")
        buying.InnerText = ComboBox1.Text

it does not seem to work though does anyone know how to do this please

[comathi]

I would try this:

Code: Select all

Dim buying As HtmlElement = WebBrowser1.Document.All.Item("type")
buying.SetAttribute("value", ComboBox1.Text)

[muttley1968]

Thank you but this does not work, it just changes it to blank text

[muttley1968]

going to keep this post open for a wee bit as their may be a more efficant way to do this but thanks to your post i just figured out what i did wrong thank you. here is the working code

Code: Select all

        Dim buying As HtmlElement = WebBrowser1.Document.All.Item("type")
        If ComboBox1.Text = "Buying" Then
            buying.SetAttribute("value", "0")
        Else
            buying.SetAttribute("value", "1")
        End If