[vb][access] Insert

Bonjour, voila j'aimerais a partir d'un formulaire pouvoir ajouter un nouvel enregistrement a ma base, au clic sur enregistrer je fais:

Code:

---

1 2 3 4 5 6 7

Dim rstenf As New ADODB.Recordset Dim cmdAjoutEnf As New ADODB.Command Call seconnecter rstenf.Open "SELECT * FROM Enfant", cnx cmdAjoutEnf.CommandText = "INSER INTO Enfant VALUES strmatecol, strmatvil, strmaten, strdatnais, strenfsex, strnom, strpre, stradresse, strcp, strville, strdatarr, strlieuarr, strdatdep, strlieudep, cla, niv " cmdAjoutEnf.Execute , rstenf rstenf.Update

---

Code:

---

1 2 3 4 5

Public Sub seconnecter() cnx.ConnectionString = "C:\Documents and Settings\alee rou\Mes documents\action vb access\EcoleMDC.mdb" cnx.Provider = "Microsoft.Jet.Oledb.4.0" cnx.Open End Sub

---

et la il me dit que Impossible d'utiliser cette connection pour cette operation, elle est fermée ou non valide dans ce contexte...

et ca plante a cette ligne :
cmdAjoutEnf.Execute , rstenf


Si quelqu'un connaissait la cause de ce pb...
Merci d'avance!
[/code]

Il faut ajouter une active connection, a la fin de votre requete ajouter vrgule puie montionen votre connection, c simple
Badr_Cool@yahoo.fr