VB - Access Problème sur requête ajout

Salut à tous,
g un ptit soucis pour ajouter des données dans une table !! Ca m'parait tout simple mé ça ne me fait rien du tout !!
Voici mon code ...

Dim baseDeDonnee As DAO.Database
Dim ajout_TMP  As QueryDef
Dim reqAjout_Tmp As String

Set baseDeDonnee = CurrentDb
reqAjout_Tmp = "INSERT INTO TMP ( id, totht, totttc ) SELECT " & id_commande & "," & totalht & ", " & totalttc & ";"
Set ajout_TMP = baseDeDonnee.CreateQueryDef("", reqAjout_Tmp)

G regardé dans la documentation VB avant de poser la question. Ma syntaxe doit être bonne mais les données ne s'écrivent pas dans ma table !!

Merci de vos réponses ...

INSERT INTO TMP ( id, totht, totttc ) SELECT " & id_commande & "," & totalht & ", " & totalttc & ";"

bonjour,

pourquoi un select??
NSERT INTO table-name [(column-name [,column-name]...)] VALUES (insert-value [, insert-value]...)

A ce moment là g un pb avec :
Set ajout_TMP = baseDeDonnee.CreateQueryDef("", reqAjout_Tmp)
mais g regardé dans la doc VB & il me dit que cette fonction marche avec SELECT, UPDATE, DELETE,
mais il ne me parle pas de INSERT INTO...
Connais tu la fonction VB ki gère l'ajout de données dans une table ?
Merci d'avance ...

je cherche le code de vb access vba (dao)  bdcombo(ajouter suppromer chercher modifier)