Syntax error (missing operator) in query expression (Visual Basic 6)?

Question

IN VB6

Hi,

When I run a simple search on a database I get the following error:

Syntax error (missing operator) in query expression 'Lesson= B Monday 12:00pm'.
(B Monday 12:00pm is my search data)

I then get the following error:

Method 'Refresh' of object 'IAdodc' failed

The code is as follows:

Private Sub search_cmd_Click()
If (TxtSearch = "") Then MsgBox "You need to select a lesson"
Adodc1.RecordSource = "SELECT * FROM booking WHERE Lesson= " & TxtSearch.Text & ""
Adodc1.Refresh
End Sub

On debug it highlights Adodc1.Refresh

Thanks!

Answer 1

Everyone is right in what they are saying. You are missing the quote. SQL requires strings encased within single quotes.



Try this



If (TxtSearch = "") Then MsgBox "You need to select a lesson"

Adodc1.RecordSource = "SELECT * FROM booking WHERE Lesson= '" & TxtSearch.Text & "'"

Adodc1.Refresh

End Sub



Note that it is not easy to see in this editor so I'll space it out for you.

.........WHERE Lesson= ' " & TxtSearch.Text & " ' "



Just as a note. The search will only work if there is a lesson that matchs your exact search string. If you use LIKE instead you can add some wild cards % at the front, end or both of your search string to find all lessons 'like' Lesson= B.



For example:



If (TxtSearch = "") Then MsgBox "You need to select a lesson"

Adodc1.RecordSource = "SELECT * FROM booking WHERE Lesson LIKE '%" & TxtSearch.Text & "%'"

Adodc1.Refresh

End Sub

Answer 2

You're missing the opening quote around the text in TxtSearch.Text. Add a ' before the " Lesson=

Answer 3

Looks like you need to add ' around your search string. So it should be:



SELECT * FROM booking WHERE Lesson= 'B Monday 12:00pm'



NOT



SELECT * FROM booking WHERE Lesson= B Monday 12:00pm

Answer 4

Vb6 Operator

Answer 5

hi what you doing, Article table doesnt have column Magazine_ID. you would be able to desire to connect those 2 tables to get the end result. go with count quantity (different Magazine_ID) From magazine inner connect Article ON magazine.call = Article.call the place Article.call = 'J. ok. Rowling' you will get rid of different clause from go with question if magazine column is regular key and its one to a minimum of one relationship between magazine and Article. Regards

Answer 6

It should be

Adodc1.RecordSource = "SELECT * FROM booking WHERE Lesson= '" & TxtSearch.Text & "' "



(With apostrophes)