Cliquer sur Login automatiquementRésolu

Question

Bonjour à tous,
J'ai un WebBrowser qui se connecte automatiquement au site Suivant : https://cis.swatch.com/fr-FR/Account/Login/Swatch

Mon but est qu'une fois que le WebBrowser arrive sur le site il faut qu'il se connecte directement.
J'arrive bien à rentrer un login et un mot de passe mais impossible de le faire cliquer sur le bouton Connexion.
Voici mon code :

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted                  Dim theElementCollection As HtmlElementCollection        theElementCollection = WebBrowser1.Document.GetElementsByTagName("input")        For Each curElement As HtmlElement In theElementCollection            Dim controlName As String = curElement.GetAttribute("name").ToString            If controlName = "UserName" Then                curElement.SetAttribute("Value", "Mon Login")            ElseIf controlName = "Password" Then                curElement.SetAttribute("Value", "Mon Password")                             End If        Next         theElementCollection = WebBrowser1.Document.GetElementsByTagName("input")        For Each curElement As HtmlElement In theElementCollection            If curElement.GetAttribute("id").Equals("login") Then                curElement.InvokeMember("Click")                             End If        Next    End SubEnd Class

Pouvez-vous me dire pourquoi le Login et le mot de passe s'inscrit bien quand j'arrive sur le site mais il ne veut pas se connecter automatiquement.

Merci d'avance pour votre aide.

ucfoutu · Answer

Bonjour,
Discussion ouverte dans le forum général de VB, que je déplace donc vers le sous-forum VB.Net. Prends s'il te plait dorénavant ce soin.

Pour répondre à ta question : pour des quantités de raisons possibles, parmi lesquelles des astuces du créateur du site pour  feinter les robots.
Interroge donc le responsable du site.

jordane45 · Answer

Bonjour,

En complément de la réponse d'Ucfoutu (que je salue au passage)
...

Pourquoi passer par les  GetElementsByTagName("input")
Sachant que tu connais les ID de tes éléments... pourquoi ne pas directement utiliser : 
WebBrowser1.Document.GetElementById("login")

tmsnake69 · Answer

Salut Jordan,

Je vient d'essayer ta proposition mais rien y fait...
Voici mon code :

 For Each curElement As HtmlElement In theElementCollection            WebBrowser1.Document.GetElementById("login")            curElement.InvokeMember("Click")

cs_ShayW · Answer

Bonjour

peut etre ici 
http://stackoverflow.com/questions/15735252/vb-net-element-invokememberclick

tmsnake69 · Answer

Salut cs_ShayW

Je te remercie beaucoup !
Le code fonctionne :)
Voici mon code final pour le bouton login clic

theElementCollection = WebBrowser1.Document.GetElementsByTagName("button")        For Each curElement As HtmlElement In theElementCollection            Dim controlName As String = curElement.GetAttribute("id").ToString            If controlName = "login" Then                curElement.InvokeMember("click")

Cliquer sur Login automatiquement

5 réponses

Votre réponse

Discussions similaires