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

Access Discussion :

Requête exécutée par code vba


Sujet :

Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    9
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 9
    Par défaut Requête exécutée par code vba
    Bonjour,

    Je souhaiterai exécuter une requete sur une table contenant 2 champs id, nom et récupérer le résultat.

    Voici mon code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Dim db As DAO.Database, rst As DAO.Recordset
    Dim sSQL As String
    ' Ouverture de la base de données
    Set db = CurrentDb
    sSQL = "SELECT tbl_requete.nom FROM tbl_requete;"
    Set rst = db.OpenRecordset(sSQL, dbOpenForwardOnly, dbReadOnly)
    En fait, je souhaiterais récupérer tous les noms de ma table pour les exploiter
    par la suite. Or il m'est possible de récupérer que le premier nom de ma table.
    Quelqu'un peut-il me venir en aide?

    Merci

  2. #2
    pgz
    pgz est déconnecté
    Expert confirmé Avatar de pgz
    Homme Profil pro
    Développeur Office VBA
    Inscrit en
    Août 2005
    Messages
    3 692
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 72
    Localisation : France

    Informations professionnelles :
    Activité : Développeur Office VBA
    Secteur : Conseil

    Informations forums :
    Inscription : Août 2005
    Messages : 3 692
    Par défaut
    Bonjour.

    Pourquoi dis-tu que tu ne trouves qu'un nom? Combien vaut le rst.Count?

    PGZ

  3. #3
    Expert confirmé
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Par défaut
    Hello,

    il faut faire dérouler ton recordset ... si tu ne sais pas comment ce n'est pas grave regarde dans la FAQ.

  4. #4
    Membre habitué
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    9
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 9
    Par défaut
    Bonjour et merci.

    Le rst.count vaut 1 alors que j'ai 3 enregistrements dans le champ "nom" : "dupond", "durand" et "martin".
    Lorsque "j'espionne" la valeur de mon recorset (rst) en mode debugage, je ne peux récupérer que le premier enregistrement dans le champ "nom" soit "dupont".

  5. #5
    Expert confirmé
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Par défaut
    Bon ok, j'insiste un peu ... regarde la FAQ !
    http://access.developpez.com/faq/?re...urir+recordset

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

Discussions similaires

  1. Réponses: 1
    Dernier message: 27/03/2008, 18h42
  2. [VBA-E] Change links par code VBA
    Par Capsule dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 12/01/2007, 10h09
  3. Définir marge par code VBA
    Par tamyme dans le forum Access
    Réponses: 2
    Dernier message: 10/03/2006, 09h43
  4. Comment faire Copier/Coller par code VBA sur INTERNET...
    Par GESCOM2000 dans le forum Access
    Réponses: 5
    Dernier message: 02/01/2006, 13h19
  5. Réponses: 44
    Dernier message: 14/03/2005, 09h43

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