Help me here please... printing doesn't honor Filtering code...

here is my code it's work fine but it doesn't filter the data...

Private Sub GetRecords()
'Dim da As OleDbDataAdapter
da = New OleDbDataAdapter("Select * from FinalCustItemRSO where RSONO=" & _cboPrintRsoNo.Text & "", cn)
da.Fill(ds, "FinalCustItemRSO")
End Sub

how could i filter on it..?

Your missing the single-quotes around cboPrintRsoNo. Why the underscore in front of cboPrintRsoNo.Text?

Try this

Code:

---

da = New OleDbDataAdapter("Select * from FinalCustItemRSO where RSONO='" & cboPrintRsoNo.Text & "'", cn)

---

still not work... it's not honoring the code... i tried it what you said..

anyway can you give me idea how to create crystal report because me I'm create and set the database fields upon creating the the crystal report...

i noticed that even if without the code it display the record