Hi Again!

What does this mean?
**
error '80020009'
Exception occurred.
**

Here's the code that caused it
**
if trim(rsResults("Rate_Date")) = FormatDateTime(Now ,vbShortDate) then
Response.write "Test Suceeded"
else
Response.write "try Again<br>"
end if
**

Also i want to compare a date in the format of 08/02/2001 but the best I can get with the FormatDateTime is 2/8/001 .. how can i get the format of the date to the one I want.

Regards and TIA