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

ben7777 Messages postés 30 Date d'inscription   Statut Membre Dernière intervention   -  
 laetitia02 -
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
A voir également:

1 réponse

Réponse 1 / 1
laetitia02
 
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

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
Trouver application résultat loterie Azerb Bulgarie Autriche
PoussinRassurant87 -
georges97 -

3 réponses
Bonjour,j'ai besoin des résultats d'aujourd'hui vendredi 29 octobre 2021 de 17h
Besoindesresultats -
brucine -

4 réponses
Loto Autriche, Bulgarie et Azerbaïdjan [SUJET GROUPÉ] .
Dja -
Panth33ra -

2 réponses