Discussion :

[SIGER_971]

Salut tout le monde !

De retour pour vous jouez un mauvais tour, voici une question piège :

Comment faire pour modifier le résultat d'une requête (écrite en SQL) à partir de mon code en VBA ?
C'est-à-dire que j'ai créer une requête (qui fonctionne), et j'aimerais changer quelques résultats en fonction
d'une condition avant de la mettre en source pour une zone de liste !

J'ai cherché dans la , sur , et je n'ai rien trouvé de satisfaisant !
En plus, l'aide d'access est très bien faite !

Voici mon code pour l'instant :

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
19
20
21
22
23
24
25
 
Private Sub Form_Load()
 
Dim oDB As DAO.Database
Dim sold As DAO.Recordset
 
Set oDB = CurrentDb()
Set sold = oDB.OpenRecordset("R_recherche_cmd_en_cours", dbOpenDynamic, dbInconsistent, dbOptimistic)
 
Do Until sold.EOF
    If sold("Solder") = True Then
        With sold
            .Edit
            .Fields("Reste_a_livrer").Value = "0"
            .Update
        End With
    End If
    sold.MoveNext
Loop
 
sold.Close
 
Me.Liste_cmd_en_cours.RowSource = "R_recherche_cmd_en_cours"
 
End Sub

N.B. : Il me renvoie l'erreur d'exécution 3001 : argument non valide au niveau de l'OpenRecordset.
(D'où l'ironie sur l'aide d'access ! )

Quelqu'un pourrait m'aider ?

[ludooo]

Je pense que tu trouveras l'aide d'access plus utile en tapant F1 en sélectionnant ta commande OpenRecordset. As-tu vérifié les arguments du OpenRecordset ?

[Tyria]

Ne serait-ce pas parce que tu as utilise un OpendbDynamic au lieu d'un OpendbDynaset ?

C'est le truc qui me semble louche dans ton code au niveau du OpenRecordset...

[SIGER_971]

Je pense que tu trouveras l'aide d'access plus utile en tapant F1 en sélectionnant ta commande OpenRecordset. As-tu vérifié les arguments du OpenRecordset ?

Justement, comme je l'ai dit dans mon message, j'y comprends rien à cette aide !

Ne serait-ce pas parce que tu as utilise un OpendbDynamic au lieu d'un OpendbDynaset ?

C'est le truc qui me semble louche dans ton code au niveau du OpenRecordset...

J'ai essayé les 2, mais rien !

Merci de votre aide, mais j'ai décidé de refondre ma base pour y arriver plus facilement !

Ciao