Requete select pour access sous VBA

j'arrive pas a exécuter une requete select pour access sous visual basic

8 réponses

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    Bon, suis pas très douée sous vba et access, mais oriente toi vers l'objet command! A mon avis c'est possible....

    tiens, j'ai trouvé ça:

    ftp://ftp2.developpez.be/developps/vb/VB-ADOX.pdf

    bon courage

    Maily   :-))))
    1. Ressalut

      En fait, ce que je voudrais savoir c'est d'une maniere generale comment exécutons une requete SQL sous VBA???
      Par exemple je veux éxecuter la requetes suivante:
      SELECT period_id FROM period WHERE period_id=2;
      Et si possible comment fais t'on pour récuperer le resultat??

      merci

      Lionel
      1. salut !
        moi je viens de voir une question précise !comment excécuter une requette sous vbs? supposons que tu as ta requette qui s'appele sqlinfos.
        tu la declare:
        dim sqlinfos As String
        sqlinfos="select blonde,brune,black,metis From fille"
        sur clic:

        sur click()
        DoCmd.RunSQL (sqlInfos)
    2. Bonjour a toi DarkMan972,

      Si tu n'as toujours pas trouvé la solution à ton probléme, voila un test que tu pourrais essayer de réalisé :

      Voici ta requete:

      SQL_rs202 = "select Period_id,period_desc2 from period " & _
      "where Period_id >= " & period_id1 & " And Period_id <= " & period_id2 & ""


      Voici ce donc je te propose de faire et tester:

      SQL_rs202 = "select Period_id,period_desc2 from period " & _
      "where Period_id >= '" & period_id1 & "' And Period_id <= '" & period_id2 & "'"


      la modification apporté étant le rajout d'une simple guillemet autour de & period_id1 & avant et apres t double guillemet ce qui donne :

      '" & period_id1 "'

      et fait la même chose pour " & period _id2 & " et ensuite termine ta requete avec ta double guillement

      Voila esperons que cela marche................
      1. oui excusez moi.

        Bonjour

        donc je précise.
        J'ai une base donnée sous access et j'ai creer un bouton dans un formulaire et je voudrais que lorsque je clique sur ce bouton he bien cela m'exécute une requete . Voila ce ke je fais mais j'ai un message d'erreur qui me dit la methode OpenRecordset n'existe pas et c vrai. Elle existait dans l'ancienne version de access mais pas dans celle la et je trouve pas l'equivalent:

        Dim dbs
        Dim rs As Recordset
        Dim rs2 As Recordset
        Dim SQL_rs202
        Dim P1

        Set dbs = CurrentDb

        SQL_rs202 = "select Period_id,period_desc2 from period " & _
        "where Period_id >= " & period_id1 & " And Period_id <= " & period_id2 & ""

        'Set rs = dbs.OpenRecordset(SQL_rs202)
        'Set rs = DoCmd.OpenQuery

        rs.Filter = "Period_id = " & period_id1 & " "
        Set rs2 = rs.OpenRecordset
        rs.Open rs.Filter, dbs
        P1 = rs2("period_desc2")
        rs2.Close
        1. Contributeur
          quelles sont les versions d'access?

          Maily   :-))))
        2. @mailyla derniere c'est access 2000 et l'ancienne c'etait access 97.
          Voila.

          merci

          Lionel
      2. merci beaucoup maily ca fonctionne.
        1. Contributeur
          Je t'en pris...

          Maily   :-))))
        2. tu peux m'expliquer comment as tu fais pour realiser t requete sql en vba je bloque totale dessus merci !!!