Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Futur Membre du Club Avatar de clubleo
    Homme Profil pro
    Technicien réseau
    Inscrit en
    mars 2016
    Messages
    18
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 75
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Technicien réseau

    Informations forums :
    Inscription : mars 2016
    Messages : 18
    Points : 8
    Points
    8
    Par défaut Avec Excel VB entrer nom & mot de passe dans une page Internet Explorer & cliquer
    Bonjour à tous,

    Sous Windows 10 EXCEL & vba, partant d’un module classique copié dans Internet, je désire ouvrir une page Internet puis entrer le login, mot de passe et effectuer un clic.
    Une autre étude viendra par la suite pour copier des fichiers annoncés.

    -Actuellement, j’ouvre facilement cette page avec le module qui suit.
    En utilisant le fichier source, pf12, frontpage désuet ….
    et malgré des essais pour trouver les 3 éléments définissants les cases des Numéro d’adhérent Mot de passe et S’identifier, je n'arrive pas à avancer.

    Je recherche donc :
    - 1 _la meilleure méthode pour trouver la définition des 3 éléments
    - 2 _inclure ces trois éléments à la place dans l’exemple
    -
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Sub Test_IE(): Dim IE As Object, doc As Object, Login, Password
         Url = "https://www.ibameo.fr/291-espace-adherent.html"
     Login = "monlogin": Password = "motdepasse"
     
         Set IE = CreateObject("internetexplorer.application")
        With IE:       .navigate Url: .Visible = True
             Do: DoEvents: Loop While .readyState <> 4 Or .Busy
     
           If .LocationURL = Url Then
             Stop
            .document.all("j_username").innerText = Login                                  ' élément 1  ??????
            .document.all("j_password").innerText = Password                             ' élément 2  ??????
     
                Do: DoEvents: Loop While .readyState <> 4 Or .Busy
                                                                                                                  ' élément 3  ??????
            .document.getElementsByClassName("ui-button ui-widget ui-state-default ui-corner-all")(3).Click
          End If
        End With
    End Sub
    Par avance, merci, pour toutes réponses

  2. #2
    Futur Membre du Club Avatar de clubleo
    Homme Profil pro
    Technicien réseau
    Inscrit en
    mars 2016
    Messages
    18
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 75
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Technicien réseau

    Informations forums :
    Inscription : mars 2016
    Messages : 18
    Points : 8
    Points
    8
    Par défaut
    Résolu avec difficulté pour trouver les bons éléments et leur écriture avec F12

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     With IE.Document
            .all("loginform_user_id_2").Value = Login         '_ élément 1   
            .all("loginform_pass_id_2").Value =password    '_ élément 2   
     
            .all("loginform_sign-in_id").Click                      '_ élément 3        
      End With '. IE.document

Discussions similaires

  1. Réponses: 7
    Dernier message: 14/06/2017, 14h14
  2. Mot de passe dans une archive
    Par Jibees dans le forum Linux
    Réponses: 1
    Dernier message: 05/12/2006, 00h08
  3. Réponses: 2
    Dernier message: 22/02/2006, 12h18
  4. [VBA] EXCEL comment mettre un mot de passe dans d’une macro?
    Par POUY64 dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 24/01/2006, 17h13
  5. sécuriser le mot de passe dans une page asp
    Par Redouane dans le forum ASP
    Réponses: 2
    Dernier message: 10/03/2004, 22h16

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo