Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Validation de formulaire web

baime

XLDnaute Nouveau
Bonjour,

Je cherche à automatiser l'accès à une url et la saisie du login/mot de passe pour ensuite récupérer des informations dans la page suivante.

En récupérant des codes un peu partout j'ai réussi à ouvrir l'url et à sasir le login/password

Par contre quand il s'agit de valider le formulaire ???? ça coince.

En regardant le code j'ai trouvé l'indice des input login et password pour le submit je pensais qu'en trouvant le nom du formulaire ça suffisait mais mince c'est pas ça

Sub connexion()
Dim IE As InternetExplorer
Dim maPageHtml As HTMLDocument
Dim Helem As IHTMLElementCollection

Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True

IE.Navigate ("http://teamhb.org")

Do Until IE.ReadyState = READYSTATE_COMPLETE
DoEvents
Loop 'attend la fin du chargement

'remplissage du login/password
Set maPageHtml = IE.Document
Set Helem = maPageHtml.getElementsByTagName("input")

Helem(2).innerText = "bxxx"
Helem(3).innerText = "sxxxx"

'click sur valider
IE.Document.getElementById("login_form").Click

End Sub

S'il y a un sauveur parmi vous super
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…