Query met datum

[harolda1980]

Ik stuur deze sql statement naar mijn acces database via ADO in vba maar iets gaat er niet goed. Hij pakt de datum niet op, iemand een idee?

strSQL = "SELECT tbrReceptuur.Id, tbrReceptuur.Recn1, tbrReceptuur.Recn2, tbrReceptuur.groep, tbrReceptuur.Cyclus, tbrReceptuur.dt, tbrReceptuur.Blok, tbrReceptuur.deel FROM tbrReceptuur WHERE (((tbrReceptuur.Recn1)='" & PassNaam1 & "') AND ((tbrReceptuur.dt)='& dt &'));"

 

[Guus2005]

Het laatste gedeelte van je query wordt niet geinterpreteerd omdat je een paar " vergeten bent

strSQL = "SELECT tbrReceptuur.Id, tbrReceptuur.Recn1, tbrReceptuur.Recn2, tbrReceptuur.groep, tbrReceptuur.Cyclus, tbrReceptuur.dt, tbrReceptuur.Blok, tbrReceptuur.deel FROM tbrReceptuur 
WHERE (((tbrReceptuur.Recn1)='" & PassNaam1 & [COLOR="seagreen"]"') AND ((tbrReceptuur.dt)='"& dt &"'));"[/COLOR]

je converteert variabele naar een tekst doordat je er ' omheen zet. Voor een datum wordt # gebruikt.

strSQL = "SELECT tbrReceptuur.Id, tbrReceptuur.Recn1, tbrReceptuur.Recn2, tbrReceptuur.groep, tbrReceptuur.Cyclus, tbrReceptuur.dt, tbrReceptuur.Blok, tbrReceptuur.deel FROM tbrReceptuur 
WHERE (((tbrReceptuur.Recn1)='" & PassNaam1 &[COLOR="seagreen"]"') AND ((tbrReceptuur.dt)=#"& dt &"#));"[/COLOR]

Share & Enjoy!