sql select

Question

comment puis je faire une requete sql avec un select, recuperer ces données et pouvoir les utiliser...

je pense avec une querydef, 

  
  Set db = CurrentDb
  Set qry = db.CreateQueryDef("", sqlCmd)

si je fais qry.execute, il me dit ke je ne peux pas faire de select avec un execute

je ne vois pas comment faire d'autre

Docck · Answer

en VBA je fais comme ca :

dim cx as new adodb.connection
dim rst as new adodb.recordset

set rst=cx.execute("Ta Requete Ici")

'Pour lire les champs
do while rst.eof=false
     msgbox rst!NomChamp
     rst.movenext
loop

rst.close
cx.close

neo3015 · Answer

msg d'erreur : operation is not allowed when  the object is closed...

je pense que cela vient de la connection. je pense que je n'en n'ai pas besoin car je suis sur une base de données locale, enfin, je ne sais pas ....

Docck · Answer

oups desole c de ma faute, j'ai oublié une ligne.

Entre dim rst as new adodb.recordset et set rst=cx.execute("Ta Requete Ici") il faut mettre set cx=currentproject.connection

cs_shun · Answer

j'ai une autre solution si tu veux sans utiliser de connexion adodb.

dim Bds as DataBase
dim RsTable as Recordset
dim Variable1 as Variant

Set Bds = CurrentDb
Set RsTable = Bds.OpenRecordset("SELECT * FROM....;")
if RsTable.RecordCount <> 0 then
     RsTable.MoveFirst
     Variable1 = RsTable.Fields("NomDuChamp")   ' sortir la valeur d'un champ et la mettre dans une variable
End if

Voila voila, j'espère que c'est ce que tu cherche

 :big) shun :big)

Sql select

4 réponses

Discussions similaires