erreur de code dans INSERT

Salut,
As tu essayé:

Strsql = "INSERT INTO tbl_cdes_ap (commande, Type) SELECT (" & Me.commande &
",'DELAI');"
DoCmd.RunSQL StrSQL
End Sub

?

--
@+ Raph.

--------------------------------------------
Merci de répondre sur le NG
Toutes remarques bienvenues !

Pour un contact direct, utiliser:
nospampizza.mpl@tiscali.fr en enlevant nospam.
--------------------------------------------



"SJ" <s_jean26@hotmail.com> a écrit dans le message de news:
cpspbc$7o5$1@aphrodite.grec.isp.9tel.net...
| Bonjour
|
| J'ai deux tables :
| - une table tbl commandes avec plusieurs champs dont "commande" qui est la
| clé primaire (de type texte)
| - une table tbl_cdes_ap dont "commande" et "type" (de type texte)
|
| j'ai un formulaire "frm_CommandeNouvelle" qui me permet de créer une
| commande dans tbl_commandes
|
| je souhaite qu'à la mise à jour de ce formulaire se créer un enrgistrement
| dans la table tbl_cdes_ap avec
| - la commande indiquée dans la formulaire
| - par défaut "DELAI" dans "Type" (je ne souhaite pas attribuer une valeur
| par défaut dans la table)
|
| J'ai donc créer le code suivant :
|
| Private Sub Form_AfterUpdate()
| Dim Strsql As String
| Strsql = "INSERT INTO tbl_cdes_ap (commande, Type) VALUES (" & Me.commande
&
| ",'DELAI')"
| CurrentDb.Execute Strsql
| End Sub
|
| mais il me met trop peu de paramètres, 1 attendu
| et me surligne dans le code CurrentDb.Execute Strsql
|
| le champ commande existe bien dans le formulaire
| et les champs commante et type dans la table tbl_cdes_ap
|
| où est le hic ???
|
|
| merci pour votre aide
|
|