Hämta datum ur access??

Hej är det någon som vet hur man kan hämta datum ur en accessdatabas?

Koden ser ut så här:
dim dd
dd = (date)

SQL2 = "SELECT * FROM aktiv where datum= "& dd
Set a2 = Connection.Execute(SQL2)

SQL2 = "SELECT * FROM aktiv where datum= #"& dd & "#"

------------------
essentitia preter non sans multiplicandum

Jag är väldigt tacksam för för ditt svar. Det funkade fint...