Combo Box For Searching Forms Help

[Tomhoneyman]

Okay, I am making a database and want to use a combo box to search a form and display date in a subform to give multiple search criteria.
I have followed a YouTube step but cant get it to work. The code is as below, anything jump out at you?


Private Sub cboSearchCustomer_AfterUpdate()
Dim myCustomer As String
myCustomer = "select from frmSearch where (Customer Name) = me.cboSearchCustomer "
Me.frmTest2SubForm.Form.RecordSource = myCustomer
Me.frmTest2SubForm.Form.Requery
End Sub

Tom

[Tomhoneyman]

More info, I have followed the YouTube video here:

https://www.youtube.com/watch?v=8N1hRBdsI1s

And the error message I am getting is:
Runtime Error 3141

The SELECT statement includes a reserved word or an argument name that is misspelled or missing, or the punctuation is incorrect

[vicsaccess]

have you tried to debugging the string? below the third line enter a new line

debug.print(mycustomer)

view in the immediate window. i believe you should be selecting something in your statement like "select customer from......"

[ranman256]

you don't have to run another query, just filter the records

Private Sub cboSearchCustomer_AfterUpdate()
        Me.filter  = "[customerName]='" & me.cboSearchCustomer & "'"
       Me.filterOn = true
 End Sub

[Bob Fitz]

Cross posting: http://www.access-programmers.co.uk/...76#post1475176

Tomhoneyman, please read: http://www.excelguru.ca/content.php?184

[Tomhoneyman]

The debug says there is an issue with

Me.frmTest2SubForm.Form.RecordSource = myCustomer

[JamesDeckert]

You'll need to give exact error messages.
Here's a different youtube which I created. Maybe it'll help.
https://www.youtube.com/watch?v=nJXqMJC60oY