Too Few Parameters?

[M4TT5T3R]

Lo... I get the following error:

=================================================
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
=================================================

On this code:

=================================================
DateTime = DateAdd("h", -5, Now)

rsToday.Open "SELECT Date FROM Messages WHERE ForumID = " & rsForums("ForumID&quot & " AND DateDiff(d, Date, #" & DateTime & "#) = 0", Conn, adOpenStatic
=================================================

I have no idea what's causing it, can someone offer any help?

 

[Andy6666uk]

hi

you have to change:

DateDiff(d, Date, #" & DateTime & "#)

into a field name, you can't use a variable here.

Andy

 

[durug]

Try to save the SQL statement in a string and then write
rs.open ssql,conn,adopenstatic

if still you get an error try replace adopenstatic with 3

Regards,
Durug

 

[M4TT5T3R]

thanks guys, after i posted i messed around with the code a little bit. This seems to work:

rsToday.open "SELECT Date FROM Messages WHERE ForumID = " & rsForums("ForumID&quot & " AND DateDiff('d', #" & DateTime & "#, Date) = 0",Conn,adopenstatic


why, i'll never know