Discussion :

[s.rais]

Bonjour à tous. J'ai un problème pour insérer une date dans un champ d'une table par le code.

Code :

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

1
2
chrSQL = "insert into caisse (datecaisse , montantcaisse , refoperation) values (" & DateDepense & ", " & MontantDepense & ",  " & RefOperation & ") "
CurrentDb.Execute chrSQL

l'insertion s'effectue mais quelque soit la valeur du champ [DateDepense] la valeur insérée est "30/12/1899".

Les champs à insérer sont récupérés à partir d'un formulaire de saisie.
Merci d'avance pour l'aide.

[Dolphy35]

Bonjour,

Code :

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

1
2
chrSQL = "insert into caisse (datecaisse , montantcaisse , refoperation) values (#" & DateDepense & "#, " & MontantDepense & ",  " & RefOperation & ");"
CurrentDb.Execute chrSQL

Les dates doivent être encapsulées de #.
si refOperation est une chaîne de caractères bien penser à '

Dolphy

[lelensois16]

Bjr,

Sous Access et VBA , les transypages sont assez légions ... donc si on veut éxécuter une requête avec une valeur date :

Code :

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

 SQL = " Select * From Table Where Date = #" & ChpDate & "# "

Cdt

[s.rais]

Merci beaucoup. ça marche