IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
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

VBScript Discussion :

Problème de Option Select


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Expert confirmé
    Avatar de hackoofr
    Homme Profil pro
    Enseignant
    Inscrit en
    Juin 2009
    Messages
    3 841
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Juin 2009
    Messages : 3 841
    Par défaut Problème de Option Select
    et Bonjour à Tous !
    voila j'ai fais ce script pour se connecter automatiquement mais hélas je suis un peu coincé dans la ligne ou je veux récupérer la 2ème Option de Select
    càd la valeur CNRPS. je veux que le script se pointe automatiquement sur cette option puis il continue sur submit pour terminer la requête.

    Voici la Partie HTML
    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
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    <tr >
                                  <td colspan="2" align="left"><font size="2"><strong><font color="#666666" > Matricule 
                                    :</font></strong></font></td>
                                  <td><div align="left">
                                      <input name="txt_matricule" type="text" id="txt_matricule" size="15" maxlength="10" />
                                  </div></td>
                                </tr>
                                <tr>
                                  <td height="26" colspan="3" align="left"><font color="#990000"><strong>Ex 
                                  de matricule :65310101</strong></font></td>
                                  </tr>
                                <tr>
                                  <td colspan="3">&nbsp;</td>
                                  </tr>
                                <tr>
                                  <td width="17%" height="30" align="left"><font size="2"><strong><font color="#666666">Mot 
                                    de passe :</font></strong></font></td>
                                  <td width="36%" height="30">&nbsp;</td>
                                  <td><div align="left">
                                    <input name="txt_matricule2" type="password" id="txt_matricule2" size="15" maxlength="12" />
                                  </div></td>
                                </tr>
                                <tr>
                                  <td height="25" colspan="3" align="left"><strong><font color="#990000">Nouveau 
                                  mot de passe</font></strong></td>
                                  </tr>
                                <tr>
                                  <td colspan="2" align="left"><font size="2"><strong><font color="#666666">Caisse :</font></strong></font></td>
                                  <td><div align="right">
                                    <label> </label>
                                    <div align="left">
                                      <select name="caisse" id="caisse">
                                        <option>CNSS</option>
                                        <option>CNRPS</option>
                                      </select>
                                    </div>
                                  </div></td>
                                </tr>
                                <tr>
                                  <td colspan="3" align="center"><input type="submit" name="Submit" value="Connexion" /></td>
                                </tr>
    Et Voici le code vbscript
    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
     
    Dim IE
    Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = 1 
    IE.navigate "http://www.cnam.nat.tn/e-cnam/pages/login_assures.jsp"
    Do While (IE.Busy)
        WScript.Sleep 200
    Loop
     
    Set Helem = IE.document.getElementById("txt_matricule")
    Helem.Value = "MaMatricule"
    Set Helem = IE.document.getElementById("txt_matricule2")
    Helem.Value = "MonPass"
    Set Helem = iE.document.getElementsByName("caisse")
    hElem(1).Status=1 'je veux récuperer la 2ème càd la valeur CNRPS ????
    Set Helem = IE.document.getElementByName("Submit")
    Helem.Click

  2. #2
    Expert confirmé
    Avatar de hackoofr
    Homme Profil pro
    Enseignant
    Inscrit en
    Juin 2009
    Messages
    3 841
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Juin 2009
    Messages : 3 841
    Par défaut
    est-ce-que je peux combiner un sendkeys pour choisir la 2 eme option ? je sèche encore

  3. #3
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    Salut,
    essai de modifier ta ligne 15 :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    helem(0).selectedIndex=1

  4. #4
    Expert confirmé
    Avatar de hackoofr
    Homme Profil pro
    Enseignant
    Inscrit en
    Juin 2009
    Messages
    3 841
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Juin 2009
    Messages : 3 841
    Par défaut
    Citation Envoyé par bbil Voir le message
    Salut,
    essai de modifier ta ligne 15 :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    helem(0).selectedIndex=1
    Bien ça marche avec cette syntaxe mais le problème devient maintenant avec
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Set Helem = IE.document.Forms(0)
    Helem.Submit
    le script ne continue pas sur submit juste il écrit les données et pointe sur la 2ème option mais je dois cliquer manuellement sur le bouton Connexion

  5. #5
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    j'aurais pensé à :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Set helem = IE.Document.getElementsByName("submit")
    helem(0).click

  6. #6
    Expert confirmé
    Avatar de hackoofr
    Homme Profil pro
    Enseignant
    Inscrit en
    Juin 2009
    Messages
    3 841
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Juin 2009
    Messages : 3 841
    Par défaut
    Citation Envoyé par bbil Voir le message
    j'aurais pensé à :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Set helem = IE.Document.getElementsByName("submit")
    helem(0).click
    Ok ça marche avec ceci et j'ai modifié ce code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Set Helem = IE.document.Forms(0) 
    Helem.Submit
    par ceci et il fonctionne lui aussi
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Set Helem = IE.document.Forms(1) 'ça mache aussi avec ceci
    Helem.Submit
    Donc C'est quoi la différence entre IE.document.Forms(0) et IE.document.Forms(1)
    encore bbil de m'expliquer cette différence et bien sûr je mettrais le problème comme

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Problème affichage avec select option
    Par kanebody dans le forum Spring
    Réponses: 5
    Dernier message: 12/11/2013, 06h27
  2. Réponses: 6
    Dernier message: 09/11/2011, 10h54
  3. Problème d'utilisation select () avant recv sous windows
    Par init dans le forum Développement
    Réponses: 3
    Dernier message: 16/03/2005, 19h36
  4. Réponses: 8
    Dernier message: 05/05/2004, 16h28
  5. [struts][JSP][select] problème avec le select
    Par redge_touch dans le forum Struts 1
    Réponses: 4
    Dernier message: 14/01/2004, 10h05

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