Validation de formulaire web

[baime]

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

 

[Pierrot93]

Re : Validation de formulaire web

Bonjour,

Regarde peut être dans la FAQ, les pages de nore ami Michel, si cela peut t'aider...
https://www.excel-downloads.com/threads/ref-wiki-page-7-de-michelxld.92375/

bon après midi
@+