Requete insertion d'une variable date dans une table en VBA
Bonjour,
J'ai pas mal regarde de forums et de pages sur internet pour tenter de faire ce que je veux faire mais je n'y arrive toujours pas. Je cherche simplement a effectuer une requete pour inserer la date du jour dans une table suite a la completion d'un formulaire. Voici comment je m'y prends:
today = Format(Date, "mm/dd/yyyy")
MsgBox (today) 'verification du bon format
db.Execute " INSERT INTO 'Numbering RegisterAccess' " & "(Title, 'Facility Code', 'Discipline Code', 'Document Type Code', 'Sequential Number', 'IMS Number', 'Requested by', Status, 'Reference Number', Comments, DateTime) VALUES " & "('" & titre & "', '" & FacilityCode & "', '" & u & "', '" & v & "', '" & a & "', '" & IMSnumber & "', '" & requestby & "', 'Draft', '" & refnumber & "', '" & com & "', #" & today & "# );"
J'ai fait attention au format de la date par rapport a ma table,tout se passe bien si je ne mets pas le champs DateTime et des que je l'ajoute j'ai l'erreur 3134. J'ai essaye tous les trucs (enfin je pense) avec " ' & #
Une petite idee ?
PS: desole pour les accents j'ecris avec un clavier anglais
J'ai pas mal regarde de forums et de pages sur internet pour tenter de faire ce que je veux faire mais je n'y arrive toujours pas. Je cherche simplement a effectuer une requete pour inserer la date du jour dans une table suite a la completion d'un formulaire. Voici comment je m'y prends:
today = Format(Date, "mm/dd/yyyy")
MsgBox (today) 'verification du bon format
db.Execute " INSERT INTO 'Numbering RegisterAccess' " & "(Title, 'Facility Code', 'Discipline Code', 'Document Type Code', 'Sequential Number', 'IMS Number', 'Requested by', Status, 'Reference Number', Comments, DateTime) VALUES " & "('" & titre & "', '" & FacilityCode & "', '" & u & "', '" & v & "', '" & a & "', '" & IMSnumber & "', '" & requestby & "', 'Draft', '" & refnumber & "', '" & com & "', #" & today & "# );"
J'ai fait attention au format de la date par rapport a ma table,tout se passe bien si je ne mets pas le champs DateTime et des que je l'ajoute j'ai l'erreur 3134. J'ai essaye tous les trucs (enfin je pense) avec " ' & #
Une petite idee ?
PS: desole pour les accents j'ecris avec un clavier anglais
1 réponse
-
J'ai finalement trouve la solution a mon probleme et j'espere que ca en aidera beaucoup d'autres voici la syntaxe exacte.
db.Execute " INSERT INTO 'Numbering RegisterAccess' " & "(Title, 'Facility Code', 'Discipline Code', 'Document Type Code', 'Sequential Number', 'IMS Number', 'Requested by', Status, 'Reference Number', Comments, [DateTime]) VALUES " & "('" & titre & "', '" & FacilityCode & "', '" & u & "', '" & v & "', '" & a & "', '" & IMSnumber & "', '" & requestby & "', 'Draft', '" & refnumber & "', '" & com & "', #" & Format(Date, "MM/DD/YYYY") & "#);"
Il fallait donc des crochet autour de DateTime et la syntaxe suivante autour de la date #"& madate &"#.
