Comment excuter une requête (Select) Access depuis VB6 et récupérer les résultats dans une variable ?
Version imprimable
Comment excuter une requête (Select) Access depuis VB6 et récupérer les résultats dans une variable ?
Utilise la propiétée RecordSource du controle Date
Code:
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
et ben avec ça, on est bien avancé ... :?Citation:
Envoyé par Bujuman
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 !!
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
Et mainetenant à la place de MaTable je veux avoir une requête (Selection) sous ACCESSCitation:
.....
uneRequete = "SELECT * FROM MaTable "
rsListView.Open uneRequete, uneConnexion, adOpenForwardOnly, adLockReadOnly
.....
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 )
uneConnexion.Execute MaRequete