Oppure

Loading
Questo topic e' stato chiuso dal moderatore.
05/04/10 21:22
Lammertrix
Ciao a tutti
ho un problema sto cercando di creare un programmino in vb.net per loggarmi
automaticamente su libero e su altri siti, riesco a riempire i campi ma non so come
premere invio visto che il form non ah id.
qualcuno puo aitarmi ?
grazie in anticipo !
 
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button2.Click
            With WebBrowser1.Document
                .GetElementById("LOGINID").SetAttribute("value","username")
                .GetElementById("PASSWORD").SetAttribute("value","password")
            End With
        Next
    End Sub

aaa
06/04/10 6:07
Federico_VbNet_Programmer
Be dovresti scaricarti la pagina,poi cercare il bottone per l'invio e una volta trovato l'id scrivere questo codice:

'Qua focalizza il bottone
WebBrowser1.Document.GetElementById(id del bottone per accedere).Focus()
'Qua preme il bottone
SendKeys.Send(ControlChars.Cr)

Dimmi come va a finire;):k:
Ultima modifica effettuata da Federico_VbNet_Programmer 06/04/10 6:08
aaa
06/04/10 18:48
Lammertrix
e proprio qui il problema ho guardato attentamente la pagina il bottone
non sembra avere id ne il form forse e dovuto al metodo post
aaa
07/04/10 4:58
Federico_VbNet_Programmer
Postato originariamente da Lammertrix:

e proprio qui il problema ho guardato attentamente la pagina il bottone
non sembra avere id ne il form forse e dovuto al metodo post


Ma è libero mail?Sennò quale?Ti procuro l'id io se lo vuoi,potrebbe esserti sfuggito:k:
Ultima modifica effettuata da Federico_VbNet_Programmer 07/04/10 4:58
aaa
08/04/10 5:08
Lammertrix
Si è libero mail, ho risolto selezionando direttamente una casella di testo
e premendo invio, grazie dell'aiuto ciao:D
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Button2.Enabled = False
            Try
                With WebBrowser1.Document
                    .GetElementById("LOGINID").SetAttribute("value", "username")
                    .GetElementById("PASSWORD").SetAttribute("value", "password")
                    .GetElementById("PASSWORD").Focus()
                End With
                SendKeys.Send(ControlChars.Cr)
            Catch ex As Exception
         
            End Try
        Button2.Enabled = True
    End Sub

aaa