SQL Execution Error - Easily Solved?

[Harrild]

this is the code from my program and i have a problem with it.

Private Sub SearchBand_Click()

Dim bandsql As String
bandsql = "Select * from cd_serial_numbers where band_name = ' " & txtband.Text & " ' "
Let Data1.RecordSource = bandsql

Data1.Refresh

End Sub

After i press the button it fails to refresh the grid. The error message is:
Run Time error '3078'

The Microsoft Jet Database engine cannot find the input table or query "". Make sure it exits and that its name is spelled correctly.

Now it does exist and yes it is spelt correctly so what is the problem?????

[DrewDog_21]

Originally posted by Harrild
Run Time error '3078'

The Microsoft Jet Database engine cannot find the input table or query "". Make sure it exits and that its name is spelled correctly.

It looks like you are passing a blank parameter into the SQL, because according to the error message the Jet engine is looking for a table or query with no name, hence the "". Put the code

Debug.Print txtband.Text

before you assign anything to bandsql, and make sure that you are passing the correct table name into the code.

[Dougz999]

Check the reply to the earlier posting it should sort your problem...

READ YOUR REPLIES!