Login impossible sur un site avec IE
bonjour,
j'ai codé en vba/html le login sur le site zeturf.fr
J'utilise Internet Explorer 11.
Après avoir entré l'identifiant et mot de passe, j'exécute le code ci dessous
pour simuler l'appui sur "Se connecter"
Function FindButonByIdAndClick(IEpage As Object)
Dim IEPageElement As Object
'fonction recherche un element par son id
Set IEPageElement = IEpage.getElementById("connection_submit")
If Not IEPageElement Is Nothing Then
IEPageElement.Click
FindButonByIdAndClick = True
Exit Function
Else
FindButonByIdAndClick = False
Exit Function
End If
End FunctionOr , depuis une dizaine de jours, après l'execution de
Set IEPageElement = IEpage.getElementById("connection_submit")au lieu d'avoir la connection et l'affichage habituel(nom du propriétaire du compte, solde,etc) le bandeau s'efface, sans connection.
J'ai ré essayé la connection cette fois manuellement et effectivement, la connection ne se fait pas non plus.
J'ai alors essayé avec Edge et, surprise, en manuel en tout cas, çà marche ( je n'ai pas réécrit le code en utilisant Edge, mais cà devrait marcher,).
Je ne connais pas suffisamment le code html pour savoir pourquoi çà marche dans un cas et pas dans l'autre.
J'ai constaté que dans le source le mot clé "connection_submit" était bien le meme dans les 2 cas.
Quelqu'un pourrait-il m'éclairer?
Bonjour Sandoz,
Juste pour info, Microsoft dit de ne plus utiliser IE11
https://www.nextinpact.com/lebrief/37992/7718-microsoft---il-ne-faut-plus-utiliser-internet-explorer...
Edge ne peut pas se gérer comme IE11 il faut passer par un driver que ce que l'on peut trouver ici et là
@+
Merçi, je l'ignorais.J'essayais seulement de comprendre pourquoi se planter à cet endroit précis.
Je vais passer à Selenium +Firefox.
Bonjour sandoz, bonjour Bruno,
Il est probable aussi que zeturf ait fait évoluer son site, car la méthode de sandoz fonctionne toujours sur d'autres sites.
Il faudrait passer par une interrogation indépendante du navigateur avec une fonction du type :
Function HtmlPost(URL As String, param As String) As String
With CreateObject("MSXML2.XMLHTTP")
.Open "POST", URL, False
.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
.Send param
HtmlPost = .responseText
End With
End Functionen passant tous les paramètres de la form de la page
<form name="connection" method="post" novalidate="novalidate" id="connection" class="login-form" action="/fr/login_check">
<input type="text" id="connection_login" name="connection[login]" />
<input type="password" id="connection_password" name="connection[password]" />
<input type="text" id="connection_jour" name="connection[jour]" />
<input type="text" id="connection_mois" name="connection[mois]" />
<input type="text" id="connection_annee" name="connection[annee]" />
<button type="submit" id="connection_submit" name="connection[submit]">Se connecter</button>
</form>par contre, si l'identification est alors enregistrée sous forme de cookie, cela devient plus complexe mais pas impossible.
Il faut aussi respecter les évenetuels droits d'auteur de zeturf.