חיפוש רשומות במסד הנתונים

שלום,

ניסיתי לחפש רשומות בתוך מסד נתונים עם האפשרות
rs.find
אבל נתקלתי בשגיאה הבאה:




ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/bd_week1.asp, line 98



הקוד הוא:



Dim conn, rs, SQLstr
Set conn = Server.CreateObject("ADODB.Connection") 'connection object
Set rs = Server.CreateObject("ADODB.Recordset") 'recordset object
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("dbdb1.mdb") & ";" 'oppening the connection
sqlstr="select * from TBL_STUDENTS"
rs.Open SQLstr, conn
rs.Find "Class='" & request.querystring("search") & "'", false, 0, 1
do until rs.EOF
response.write rs("Name") & "   " & rs("Class") & "   " & rs("B_D") & "<br>"
rs.MoveNext
loop
rs.close
conn.close


תודה מראש,
עומר.