Affichage résultat requête Select depuis code VB

Affichage résultat requête Select depuis code VB - VB/VBA/VBS - Programmation

Marsh Posté le 06-05-2009 à 15:45:00    

Bonjour,
 
Mon problème se situe au niveau de l'affichage d'une requête SQL codé en VB sous Access.
 
Je voudrai que lorsque cette requête (SELECT ...) est lancée sous VB, le résultat s'affiche comme si j'avais double cliquer sur une requête existante sous Access.
 
Merci.

Reply

Marsh Posté le 06-05-2009 à 15:45:00   

Reply

Marsh Posté le 06-05-2009 à 16:59:10    

Il existe bien une solution ?  :(

Reply

Marsh Posté le 07-05-2009 à 15:35:37    

La question n'est pas très précise.
 
Il y a deux sujets :
 
1. Exécution d'une requête
2. Affichage des résultats d'une requête
 
S'il s'agit d'ouvrir une requête stockée dans l'onglet des requêtes et de faire afficher les résultats dans une fenêtre qui s'ouvre automatiquement, alors faire :

DoCmd.OpenQuery "nom_de_la_query_stockee", acViewNormal, acReadOnly


S'il s'agit d'éxécuter une requête qui a été créée à la volée en VBA, et d'avoir les résultats dans des recordset, dont les parties vont être copiées dans des champs d'un formulaire, alors faire :

SQL_ligne = "SELECT TITI, TATA" & _
            " FROM TUTU " & _
            "WHERE TOTO = " & "'" & variable_toto & "';"
 
' MsgBox (SQL_ligne) ' debug
Set bds = CurrentDb
Set rst = bds.OpenRecordset(SQL_ligne)
Do While (Not rst.EOF)
   Me![champ_un] = rst![TITI]
   Me![champ_deux] = rst![TATA]
   rst.MoveNext
Loop
rst.Close


Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed