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....