Bonsoir à tous,
j'ai la requête ci-dessous qui ne fonctionne pas :
A l'exécution, j'ai le message "trop peu de paramètre - 1 attendu"
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 Private Sub SalleLongueur_AfterUpdate() Dim oRst As DAO.Recordset Dim db As DAO.Database Dim sSql As String sSql = "SELECT Sum(Tbl_LiaisonSalle.SalleLongueur) AS SommeDeSalleLongueur FROM Tbl_LiaisonSalle GROUP BY Tbl_LiaisonSalle.Num_Liaison HAVING ((Tbl_LiaisonSalle.Num_Liaison)=[Forms]![Frm_Liaison]![ID_Liaison]);" Set oRst = CurrentDb.OpenRecordset(sSql, dbOpenDynaset, dbReadOnly) With oRst LongueurCalculee = .Fields("SommeDeSalleLongueur") End With End Sub
Le problème doit venir de là :La syntaxe pour aller sur le sous-formulaire doit être incorrecte, mais .... je sèche
Code : Sélectionner tout - Visualiser dans une fenêtre à part =[Forms]![Frm_Liaison]![ID_Liaison]);"![]()
En effet, sans la clause HAVING, ça fonctionne. Je n'ai plus le message d'erreur mais le résultat est erronné (mais c'est normal)...
Bon week-end à tous.
Curt
Partager