Ciao, sto cercando automatizzare l'inserimento di alcuni dati in una pagina internet. L'applicazione carica la pagina con un webbrowser, inserisce i valori e preme sul bottone che li invia.

Il problema è questo: nell'evento "DocumentCompleted" vado in cerca dei campi da riempire e funziona solo uno dei campi per volta.... io però vorrei inserire più valori....


questo è il codice:

codice:
Dim doc As HtmlDocument = (CType(sender, WebBrowser)).Document
            Dim elementi As HtmlElementCollection
            Dim elemento As HtmlElement

            ' seleziono select
            elementi = doc.GetElementsByTagName("SELECT")
            For i As Integer = 0 To elementi.Count
                elemento = elementi.Item(i)
                If elemento.GetAttribute("name") = "ConoscenzaAllState" Then
                    elemento.SetAttribute("value", "06        ")
                End If
            Next


            ' seleziono radio
            'elementi = doc.GetElementsByTagName("input")
            'For i As Integer = 0 To elementi.Count
            '    If elementi.Item(i).GetAttribute("type") = "radio" Then
            '        elementi.Item(i).SetAttribute("checked", "checked")
            '    End If
            'Next

            ' inserisco text
            'elementi = doc.GetElementsByTagName("INPUT")
            'For i As Integer = 0 To elementi.Count
            '    elemento = elementi.Item(i)
            '    If elemento.GetAttribute("name") = "dataInizioValidita" Then
            '        elemento.SetAttribute("value", "30/10/2008")
            '    End If
            'Next
in pratica sia "seleziono select" che "seleziono radio" che "inserisco text" funzionano singolarmente ma se ne decommento più di uno allora finita l'esecuzioen di un blocco si ferma anche l'esecuzione del programma....