Import données Web avec login et mot de passe
Bonjour,
J'ai une macro qui me permets d'importer certaines données d'un site web avec des hyperlinks récupérer "en cascade",
mais par contre si je veux importer davantage de données sur ce site il faut se loguer sur le site ( l'inscription étant gratuite).
J' ai réussi à remplir le login et le mot de passe (quoique pas sûr j'ai plutôt l'impression qui change le label Cf.script)
mais le "click sur Ok" me pose problème
ci dessous la partie du script html du site en question
<div id="bu-formulaire" class="yui-g content">
<div class="yui-u first">
<form name="login" id="login" action="https://www.geny.com/client/login" method="post"> <table><tr><td>Connexion : </td> <td> <input type="hidden" name="urlRedirection" id="urlRedirection" value="http://www.geny.com/">
<div id="loginDiv">
<label for="loginDiv-field" class="overlabel">E-mail</label>
<input id="loginDiv-field" type="text" name="login" title="E-mail" value="" tabindex="1" size="22" > </div> <div id="passwordDiv">
<label for="passwordDiv-field" class="overlabel">Mot de passe</label>
<input id="passwordDiv-field" type="password" name="password" title="Mot de passe" value="" tabindex="2" size="15" > </div> </td> <td> <div id="submitDiv">
<input type="submit" name="submit" value="Ok" tabindex="3" >
<input type="checkbox" id="memoriser" name="memoriser" value="true" tabindex="4" checked> Mémoriser</div>et le code:
Sub OpenIE()
Dim IE As InternetExplorer
Dim Helem As HTMLElementCollection
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.geny.com"
Do Until ReadyState = (READYSTATE_COMPLETE)
DoEvents
Loop
Set Helem = IE.document.getElementById("loginDiv-field")
Helem.Value = "xxxxx"
Set Helem = IE.document.getElementById("passwordDiv-field")
Helem.Value = "xxxxx"
Set Helem = IE.document.getElementById("submitDiv")
Helem.Click [color=#008000]'j'ai essayer avec Helem.Value="OK"[/color]
End SubMerci d'avance pour votre aide et vos conseils.
Cordialement Bruno.
Bonsoir,
J'ai finalement trouver la solution en passant par le code ie.document.all("submit").Click
Par contre maintenant j'ai un peu éviter un autre problème, à savoir utiliser la memorisation automatique de login pour ouvrir une autre adresse du meme site,
donc j'ouvre IE je me logue
Je ferme IE
J'ouvre de nouveau IE même site mais lien différent
Problème : tester si logué ou pas, et message d'erreur windows "problème survenu dans internet explorer"
Donc pas terrible, alors puis je facilement une fois logué cliqué sur des liens,rechercher du texte,copier...?
ou il y a quelque chose que j'ai zappé ?
Si besoin je peux mettre mon code !
Merci de vos conseils