Discussion :

[Le Pharaon]

Comment excuter une requête (Select) Access depuis VB6 et récupérer les résultats dans une variable ?

[twizell]

Utilise la propiétée RecordSource du controle Date

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
data1.RecordSource = "Select * from [MaTable];"
data1.Refresh
do while not data1.eof
    MaVariable = data1.recordset("MonChampContenantResultat")
    data1.movenext
loop

[ThierryAIM]

Comment excuter une requête (Select) Access depuis VB6 et récupérer les résultats dans une variable ?

et ben avec ça, on est bien avancé ...

Si je te réponds aussi bêtement que tu poses ta question, ca donne à peu près ça :

En effectuant une requête Select et en lisant le recordset qui en resulte !!

[Le Pharaon]

Pas de contrôle Data ni Adodc. Je fais ma connexion manuellement.

ThierryAIM je suis désolé si la question a été bêtement posée. Je vais procèder par un exemple.

Pour une table par exemple

.....
uneRequete = "SELECT * FROM MaTable "
rsListView.Open uneRequete, uneConnexion, adOpenForwardOnly, adLockReadOnly
.....

Et mainetenant à la place de MaTable je veux avoir une requête (Selection) sous ACCESS

[Le Pharaon]

Je m'excuse d'avoir été bête
il suffisait juste de mettre le nom de la requête à la place de celui de la table.

Il reste maintenant à savoir comment procèder pour la requête Action (mise à jour ou insertion )

[ThierryAIM]

uneConnexion.Execute MaRequete