Bonjour à tous,

J'ai récupéré et adapté ce petit bout de code pour me connecter à une application web automatiquement après avoir rempli un formulaire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Sub ie_open()
   With CreateObject("InternetExplorer.Application")
     .navigate "mon adresse"
     .Visible = True
     Do Until .readyState = 4
       DoEvents
     Loop
     DoEvents
     With .document
        .forms("XXXX").elements("login").Value = "XXXXX"
        .forms("XXXX").elements("password").Value = "XXXXX"
        .forms("XXXX").submit
     End With
  End With
End Sub
Le problème est que lorsque j'utilise le submit, le login et mdp n'est pas reconnu.

Si je l'enlève, mes champs se remplissent correctement. En cliquant sur le bouton "se connecter" manuellement, j'arrive à me connecter.

Est-ce je fais quelque chose de travers? Ou alors cette page est protégée pour ne pas être validée par une tiers application?

J'avoue que je suis pas un spécialiste de l'html. J'ai essayé aussi de repérer le bouton dans le code source et de faire un truc du style :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
Set SignInButton = LoginForm
SignInButton.Click
mais sans succès non plus. En fait, soit signbutton est égal à nothing, soit ça fait rien. Donc j'arrive pas à cibler correctement le bouton.

Merci beaucoup