Authentification sur un site web

Question

Bonjour, 

Je souhaiterais via un fichier excel à m'authentifier sur la page suivante : https://wwws.linxo.com/auth.page#Login

J'ai cherché sur le net mais sans résultat. Y aurait-il quelqu'un qui sache comment faire ?

Un grand merci d'avance.

Delphine

vb95 · Answer

bonjour
une piste possible : http://www.developpez.net/forums/d1155013/logiciels/microsoft-office/access/vba-access/s-authentifier-site-web-via-vba-puis-ateindre-rubrique-presisee-puis-extraire-xls/

hexa82 · Answer

Bonjour et merci pour ce lien.

Voici donc le code que j'ai entré :

Sub Connexion()
Dim IE As InternetExplorer
    Dim IEd As Object
    Dim DOCelement As Object
 
    Set IE = New InternetExplorer
    IE.Visible = True
    IE.Navigate ("https://wwws.linxo.com/auth.page#Login")
 
     ' attente de fin de chargement
    Do Until IE.ReadyState = 4
        DoEvents
    Loop
 
    Set IEdoc = IE.Document
 
    'login
     Set DOCelement = IEdoc.getElementsByName("username").Item
     DOCelement.Value = "Mon_pseudo"
 
    'password
     Set DOCelement = IEdoc.getElementsByName("password").Item
     DOCelement.Value = "Mon_mot_de_passe"
     DOCelement.Select
 
    'connexion
     Set DOCelement = IEdoc.Forms(0)
     DOCelement.submit

End Sub

Mais le déboggeur s'ouvre et "IE As InternetExplorer" apparait en bleu avec un message d'erreur "Type défini par l'utilisateur non défini".

Une idée ?

Authentification sur un site web

2 réponses

Votre réponse

Discussions similaires