J'utilise Access 2003, et je veux executer les codes ci-dessous mais a chaque fois le contenu du recordset est vide aide moi svp

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim STR As String
    Dim x As Recordset
    Set db = CurrentDb
    STR = "SELECT Montant FROM vouchComptes "
    Set x = db.OpenRecordset(STR)