insert into avec une date

Bonjour

Sous access
voila j'ai une table facture avec
un id
l'id de la societe
et une date qui est le dernier jour du mois

par cette fonction :

Code:

---

1 2 3

Public Function GetLastDayOfThisMonth(annee As Integer, moislettre As Integer) As Date GetLastDayOfThisMonth = DateSerial(annee, moislettre + 1, 0) End Function

---

et il me fait une erreur

Code:

---

base.Execute "INSERT INTO facture (idsociete,date) VALUES (2," & GetLastDayOfThisMonth(CmbAnnee, CmbMois.ListIndex + 1) & ");", dbFailOnError

---

et il me faite une erreur 3134 erreur de syntaxe dans le INSERT INTO

j'affiche mon GetLastdayOfthisMonth

et j'ai bien une datesous la forme: 28/02/2006

Si la base de données (à préciser prochainement) est ACCESS il faudra ajouter des ##

Code:

---

base.Execute "INSERT INTO facture (idsociete,date) VALUES (2,#" & GetLastDayOfThisMonth(CmbAnnee, CmbMois.ListIndex + 1) & "#);", dbFailOnError

---

Bonsoir,

"date" est un mot réservé d'Access. Il faut donc le mettre entre crochets dans la requête d'insertion :

Code:

---

base.Execute "INSERT INTO facture (idsociete,[date]) VALUES (2,#" & GetLastDayOfThisMonth(CmbAnnee, CmbMois.ListIndex + 1) & "#);", dbFailOnError

---

wape

ah oui un mot clé réservé

qu'est ce queje peux etre myope parfois

BOn merci

@ ++