Ou est le résultat de la requete VBA ??

Fermé
ben7777 Messages postés 30 Date d'inscription vendredi 19 mai 2006 Statut Membre Dernière intervention 1 août 2007 - 21 juil. 2006 à 11:45
 laetitia02 - 24 janv. 2008 à 16:46
Salut,

Je ne comprend pas j'ai crée une requte SQL en VBA access, le code ne me signale pas d'erreur mais je ne sais pas ou trouver le résuultat de cette requete ! Je ne m'y connais pas bien ... Sinon pouvez vous m'indiquer comment mettre le résultat de cette requete dans une nouvelle table ?
Pour info voici la requête :

With Rs
.ActiveConnection = cnnDB
.Source = "SELECT [COM N-1],[Issue Number], [Issue Name], [PRP], [PDP], [SRP], [SDP] FROM t_MoisActuelReorganized WHERE (([COM N-1] LIKE '%" + Overdue + "%') And ([Status] = 'Open'));"
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.CursorLocation = adUseServer
.Open
End With

Merci bcp d'avance

1 réponse

salut

pour récupérer le résultat il faut faire
dim rs as recordset
dim mabase as database
dim mabase = currentBD
:
:
:
With Rs
.ActiveConnection = cnnDB
.Source = "SELECT [COM N-1],[Issue Number], [Issue Name], [PRP], [PDP], [SRP], [SDP] FROM t_MoisActuelReorganized WHERE (([COM N-1] LIKE '%" + Overdue + "%') And ([Status] = 'Open'));"
set rs=mabase.openrecordset(Source)

toute t informations se trouve dans rs qui est un curseur, apres tu peux le parcourir avec une boucle
voila
0