Discussion :

[stan21]

bonjour tous le monde,

j'ai encore besoin de vos conseils avisés
voici la requête en question :

Code :

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

1
2
3
4
 
SQL = "INSERT INTO Codif (Codif.ID_Type, Codif.Libel_Sys)"
SQL = SQL & "VALUES ((SELECT MAX(Type.ID_Type) FROM Type;), '" & Me.systeme & "');"
DoCmd.RunSQL SQL

je précise que les tables Codif et Type sont liées

je sais que c'est un peu fouilli tout ça mais pouvez vous me dire ou se trouve mon erreur, merci.

[stan21]

voici l'erreur que j'obtiens :

erreur d'exécution'3000':

reserved error (-3025);there is no message for this error.

[fdraven]

Tu as un ; de trop dans ta requête. Tu peux essayer le code suivant :

Code :

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

1
2
3
SQL = "INSERT INTO Codif (Codif.ID_Type, Codif.Libel_Sys)"
SQL = SQL & " VALUES ((SELECT MAX(Type.ID_Type) FROM Type ), '" & Me.systeme & "');"
DoCmd.RunSQL SQL

En espérant t'avoir aidé.