Passerer kompilering men gjør ikke jobben (dato trøbbel)

Jeg har kommet frem til denne sql:

Dim testdato As Date
testdato = Date

sql = "SELECT utlaan.laantaker_id, ref_bruker.brk_navn, utlaan.utstyr_id, data_inventar.beskrivelse, utlaan.fra_dato, utlaan.forventet_in_dato, utlaan.laantaker_tlf, data_inventar.kat_id" + _
" FROM utlaan, ref_bruker, data_inventar WHERE utlaan.laantaker_id = ref_bruker.brk_id AND" + _
" utlaan.utstyr_id = data_inventar.id AND utlaan.til_dato IS NULL AND" + _
" forventet_in_dato <" + Format$(testdato, "ddmmyyyy")

Og denne passerer kompileringen men det er framdeles feil.
SQL settningen skiller ikke ut de datoene som er mindre en dagens dato, men tar med alle både over og under.
Og hvis jeg snur tegnet > så finner den ingen poster i det hele tatt selv om det er poster som skulle blitt funnet.