error 2001 to ms access 2003

hi... I have problem very very larg for my project and it is error 2001 for botton search pls help me

this is my code...

btnserach.....()

If Me.Frame2.Value = 1 Then
   
    Me.subfrmproducts.Form.RecordSource = "SELECT * from Categories where CategoryID='" & txtgid.Value & "'"
  Else
    Me.subfrmproducts.Form.RecordSource = "SELECT * from Categories where CategoryName ='" & txtgname.Value & "'"

End If