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 :

[IE] Click, Submit, Enter.


Sujet :

VBScript

  1. #1
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2012
    Messages
    40
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Décembre 2012
    Messages : 40
    Points : 40
    Points
    40
    Par défaut [IE] Click, Submit, Enter.
    Bonjour à tous,

    Je viens sur le forum aujourd'hui pour vous demander de l'aide sur un problème que je rencontre.
    En effet, je voudrais piloter Internet Explorer avec un Script en VBScript.

    Seulement, je voudrais effectuer un click sur une page web. Alors, pour commencer, je me suis rendu sur la valeur précise, avec comme fonction:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    set recup = ie.document.getElementById("liens").getElementsByTagName("tr").item(0).getElementsByTagName("td").item(1)
    Lorsque je fais un outerhtml, je tombe bien sur l'endroit que je veux. Mais ensuite, pour simuler la touche d'une souris à l'endroit voulu, ça ne fonctionne pas.

    Le code source de la page HTML à l'endroit indiquer est:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     <td><div onclick="getlien('livre',30,);" class="boutondownload">Livre Informatique</div></td>
    la fonction du site, onclick ne me permet pas d'effecuer un Click, ou un Enter.
    Auriez-vous une solution?

    En vous remerciant.

  2. #2
    Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 066
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 066
    Points : 17 092
    Points
    17 092
    Par défaut
    Salut, bienvenue sur DVP

    Tu veux dire que la commande recup.Click est refusé ou inopérante ?
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
    👉 → → Ma page perso sur DVP ← ← 👈

  3. #3
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2012
    Messages
    40
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Décembre 2012
    Messages : 40
    Points : 40
    Points
    40
    Par défaut
    Merci bien et je pense y rester un bon bout de temps pour apprendre parfaitement le VBS et VBA.

    Merci de votre réponse.

    La commande est inopérante. Certainement parce que j'appelle un bouton dans une table qui est en plus en "Javascript".

  4. #4
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2012
    Messages
    40
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Décembre 2012
    Messages : 40
    Points : 40
    Points
    40
    Par défaut
    Bon, je pense avoir trouvé. Je ferrais la vérification ce soir.

    En attendant, je donne les deux bouts de codes qui peuvent remplir (peut être) cette fonction.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
    set recup = ie.document.getElementById("liens")
    for each recup in liens
    	strText = recup.innerhtml
    	msgbox = strText
     
    if (strtext= "livre informatique")
    	recup.click
    exit for
    ou

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    For Each recup In IE.Document.getElementById("liens")
    If InStr(recup.getAttribute("onclick"), "getlien") Then
    recup.Click
    Exit For
    En espérant que l'un des deux fonctionnent!

  5. #5
    Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 066
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 066
    Points : 17 092
    Points
    17 092
    Par défaut
    Salut

    En regardant le tutoriel de Qwazerty , Interaction avec Internet Explorer via VBA Excel au chapitre IV-I. Utilisation des fonctions disponibles sur la page il semblerai donc possible de faire
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    set recup = ie.document
    recup.parentWindow.execScript "getlien('livre',30,);", "JavaScript"
    A expérimenter, en verifiant si la fonction est bien du JavaScript (le ; semble l'indiquer), il suffirait de rechercher dans le code source, le mot getlien.
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
    👉 → → Ma page perso sur DVP ← ← 👈

  6. #6
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2012
    Messages
    40
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Décembre 2012
    Messages : 40
    Points : 40
    Points
    40
    Par défaut
    Merci bien, ça marche

    Je vais me servir de la bible, je vais pouvoir apprendre pas mal de chose on dirait

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

Discussions similaires

  1. [vb.net] click et enter sur un bouton
    Par olbi dans le forum VB.NET
    Réponses: 2
    Dernier message: 15/03/2007, 19h51
  2. [VB.NET] Gérer TAB, ENTER et Click en même temps
    Par khany dans le forum Windows Forms
    Réponses: 4
    Dernier message: 07/03/2006, 13h15
  3. submit on click sur un checkbox
    Par amika dans le forum Général JavaScript
    Réponses: 7
    Dernier message: 17/05/2005, 16h48
  4. Réponses: 7
    Dernier message: 03/03/2005, 12h36
  5. Pas soumettre un bouton submit quand "enter" press
    Par novastar dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 01/03/2005, 19h16

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