Search code not quite right

[action]

I found this code for a search filter on this forum some time ago, It use to work but I have stuffed it and now it is beyond my skill level. (I can't find the orginal again) It appears to run ok but fails to produce any results. can anybody see whats wrong with it?

Thanks


Private Sub cmdSearch_Click()

If IsNull(Me.txtFilter) Then
MsgBox "You have not entered any filter criteria.", vbExclamation, "Product Search"
Exit Sub
End If
With lstResults

.RowSource = "SELECT PRODUCT1.[Description One], PRODUCT1.[Description Two], PRODUCT1.[Inventory Qty], PRODUCT1.[Standard Price], PRODUCT1.[Current Cost] FROM PRODUCT1 WHERE [Description One] Like '"
.Requery
End With

End Sub

 

[pbaldy]

Your WHERE clause seems to be left hanging. What is it you want to compare [Description One] to? Right now, the clause is incomplete: "[Description One] Like "...like what?