Discussion :

[eraim]

Bonjour à tous!

Voilà mon pb...
J'aimerais exécuter une requête "SELECT..." en VB et récupérer les résultats de la requête pour les manipuler et afficher ce que je veux dans mon formulaire.

J'ai eu beau regarder sur le forum, mais je ne comprends rien...

Est-ce que qqn peut m'expliquer comment faire ?

Merci d'avance!

[_developpeur_]

Tu utilises un recordset que tu ouvre en passant ta requête.

Ensuite tu boucle sur ton recordset et tu récupère les données

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
    Dim db As DAO.Recordset 'Recordset
 
    'Ouverture recordset avec la requete
    Set db = Application.CurrentDb.OpenRecordset("SELECT parameter.Value FROM Parameter WHERE parameter.name_parameter='PASSREPORT';")
 
    'Test pour savoir si le recordset n'est pas vide
    If db.EOF = False Then
        db.MoveFirst 'Recordset mis au début
        Do While Not db.EOF 'Boucler sur les résultats
            msgbox db.Fields("Value").Value 'Affichage des résultats
            db.MoveNext'Passer à l'enregistrement suivant
        Loop
        db.Close'Fermeture du recordset
    End If
 
    'Détruire le recordset
    Set db = Nothing

Voila

[pgz]

Bonjour,

Pour afficher le résultat d'une requête dans un formulaire, tu peux en VBA modifier le recordsource du formulaire. Par exemple, avec un code associé au formulaire:

Code :

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

Me.RecordSource = "SELECT ... FROM ... WHERE ..."

Bonne chance,
pgz

[eraim]

Ok, j'ai tout compris! C'est plus clair maintenant!

Merci beaucoup de votre aide!