hjälp med år

If Request.QueryString("sort") = ""  Then
Sql =" Select * from Kalender  WHERE   Month(Datum) = " & sMon &" order by datum"
End IF

denna kod plockar fram händelser i en db.. men den tar alla händelser med månaden som den få i en querystring-- nu vill jag att den bara plockar aktuell tå... kan jag lägga till det i Sql-satsen och i såfall hur?

Access?

Sql =" Select * from Kalender  WHERE   Month(Datum) = " & sMon &" and year(datum) = year(now()) order by datum"