How SHuld I continue?

[kunnie]

PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim custReader As OleDb.OleDbDataReader

Dim a2 AsString

With OleDbConnection1

.Open()

Dim comm As OleDb.OleDbCommand

comm = OleDbConnection1.CreateCommand

comm.CommandText = "SELECT * FROM Table1 WHERE Illness = 'Cough'"

custReader = comm.ExecuteReader

With custReader

'This is the part I donno how to continue'

EndWith
EndWith

EndSub

EndClass

 

[cjaymcmeans]

exaclty what are you trying to accomplish?
can you give me more details...
you could try using a data-adapter instead of a reader...