[RESOLVED] query problem using combo box

[matrik02]

I have problem here.. my field name "Nama Penyakit" is text data type and I want to query from combo box. After getting the result I want to show the ID number for selected record in textbox. Why I get the error message like this?

penyakittable.Open "Select * from penyakit where Nama Penyakit" & "' Combo1.List(Combo1.ListIndex)'", conpenyakit, adOpenDynamic, adLockOptimistic

Text34.Text = penyakittable.Fields("Penyakit id").Value & ""

[Hack]

You are missing an equals ( = ) sign

[matrik02]

It still got same error message. Why?Field name is correct.

penyakittable.Open "Select * from penyakit where Nama Penyakit =" & "' Combo1.List(Combo1.ListIndex)'", conpenyakit, adOpenDynamic, adLockOptimistic

Text34.Text = penyakittable.Fields("Penyakit id").Value & ""

[anhn]

* Because filed name Nama Penyakit contains a space, you have to put it in brackets: [Nama Penyakit]
* What after "=" sign is wrong.
It should be:

"Select * from penyakit where [Nama Penyakit] = '" &  Combo1.List(Combo1.ListIndex) & "'"

[matrik02]

Thank you.

[Hack]

* Because filed name Nama Penyakit contains a space, you have to put it in brackets: [Nama Penyakit]
* What after "=" sign is wrong.
It should be:

"Select * from penyakit where [Nama Penyakit] = '" &  Combo1.List(Combo1.ListIndex) & "'"

Ahhhh.....I missed that. Good catch!