Discussion :

[s.jean]

Bonjour,

Je souhaite utiliser le code INSERT INTO
J'ai un formulaire avec 2 sous-formulaires, je souhaite qu'en double
cliquant sur un article du 1er formulaire il me le créé dans le 2e
formulaire, voici mon code, qui ne marche pas :

Code :

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

1
2
3
4
5
Private Sub Form_DblClick(Cancel As Integer) 
DoCmd.RunSQL "INSERT INTO tblListeDetail(IDProduit) VALUES 
(Me.IDProduit)" 
DoCmd.Save 
End Sub

Les champs sont numériques, mais le message d'erreur me signale une
erreur de conversion


Où est l'erreur ?


Merci
Sandrine

[philben]

bonjour,

avec un peu de chance...

Code :

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

1
2
 
DoCmd.RunSQL "INSERT INTO tblListeDetail(IDProduit) VALUES (" & Me.IDProduit & ")"

Philippe

[s.jean]

Bonjour,

merci pour la réponse super rapide, alors maintenant c'est une autre erreur

Dans mon IDProduit j'ai plusieurs produits : pain, eau etc ... (avec chacun une référence numérique)

Quand je double clique sur ma ligne "eau" par exemple, il m'ouvre une fenêtre avec le texte "eau", et un champ en dessous à remplir comme si eau était un critère à définir (alors qu'il devrait me crééer un enregistrement avec eau pour le champs IDProduit

Une idée ?

merci
Sandrine

[lvr]

C'est normal car le résultat (l'ordre sql) de ce philben te propose sera

Code :

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

INSERT INTO tblListeDetail(IDProduit) VALUES (eau)

Access va prendre eau comme une variable SQL dont il ne trouve pas la définition et va te demander une valeur.

Comme ton eau n'est une variable mais une valeur textuelle il faut la mettre entre "

Donc tu devrais écrire

Code :

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

DoCmd.RunSQL "INSERT INTO tblListeDetail(IDProduit) VALUES (" & chr(34) & Me.IDProduit & chr(34) & ")"

chr(34) produisant des "

----

Ceci étant dit, j'ai deux remarques:
1) si je devais l'écrire moi-même je ne procéderais pas avec un DoCmd.RunSQL mais plutôt en passant par un DAO.RecordSet... As-toi de voir, peut-être y a-t-il des avantages que je connais pas à passer par un DoCmd.RunSQL...

2) Ce qui m'intrigue c'est ta phrase

Dans mon IDProduit j'ai plusieurs produits : pain, eau etc ... (avec chacun une référence numérique)

Qu'est ce que tu veux dire par "(avec chacun une référence numérique)" ?