run-time error 424 object required

[tony6844]

Hi
I am new at this could someone point me in the right direction

 
Private Sub cmdSearch_Click()
 
    If Len(cboSearchField) = 0 Or IsNull(cboSearchField) = True Then
        MsgBox "You must select a field to search."
 
    ElseIf Len(txtSearchString) = 0 Or IsNull(txtSearchString) = True Then
        MsgBox "You must enter a search string."
 
    Else
 
 
        GCriteria = cboSearchField.Value & " LIKE '*" & txtSearchString & "*'"
 
 
        Form_frmDVDPrograms1.RecordSource = "select * from DVDPrograms where " & GCriteria
        Form_frmDVDPrograms1.Caption = "DVDPrograms (" & cboSearchField.Value & " contains '*" & txtSearchString & "*')"
 
 
        DoCmd.Close acForm, "frmSearch"
 
        MsgBox "Results have been filtered."
 
    End If
 
End Sub
 
 

Problem with the line

 Form_frmDVDPrograms1.RecordSource = "select * from DVDPrograms where " & GCriteria
 

[smartchap]

Please check if table DVDPrograms or form Form_frmDVDPrograms exits. It appears that either of them is not found / set in the form.

[lotus18]

Double-check if the field is really existing or not. Uhm... Why don't you try to replace the asterisk character (*) with percent sign (%). This is only just a suggestion : ).

Rey Sean

[rpicilli]

Hi there.

The line below is not correct.

GCriteria = cboSearchField.Value & " LIKE '*" & txtSearchString & "*'"

When you use the LIKE and you desire to get similar words you need to supply the symbol % not *

Your line should be (pick just one) depending what you expect from your query.

GCriteria = cboSearchField.Value & " LIKE '%" & txtSearchString & "'"
 
or
 
GCriteria = cboSearchField.Value & " LIKE '" & txtSearchString & "%'"
 
or 
 
GCriteria = cboSearchField.Value & " LIKE '%" & txtSearchString & "%'"
 
 
 

[tony6844]

Thanks for your input but still failing at the same line of code and have tried all your suggestions

Tony

[debasisdas]

try using this

GCriteria = cboSearchField.list(cboSearchField.ListIndex) & " LIKE  '%" & txtSearchString & "%'"
 

[Stewart Ross]

You have not posted the value of GCriteria, which includes the item selected from your combo (your search field names). I would guess these field names have spaces in them. Spaces in the field name within the WHERE part will cause a run-time error unless you use the correct syntax for the DB engine concerned. You don't say what the DB is, so I'll assume it is Jet (Access) for now.

You will need to include the field name in brackets in your SQL string for the syntax to be correct.

GCriteria = "[" & cboSearchField & "] LIKE '*"

If indeed it is the Jet database engine you are accessing then the wildcard character for use with Like is the "*" and not the "%". On the other hand you might be accessing a different DB back-end in which the '%' is the wildcard - we don't know because you have not told us what DB you are using.

-Stewart