loopinh

[r3sann]

hello

can anyone help me how to loop? this is the code
dim itemcode as char

Dim conbackview As New OdbcCommand("select item_code from warehouse_mst where jpn =' " & qjpn2 & " ' ", connbackview)
Dim drbackview As OdbcDataReader = conbackview.ExecuteReader(CommandBehavior.Default)

Do While drbackview.Read

itemcode = drbackview.Item("item_code")
MsgBox(itemcode)

Loop

'the connbackview is my connection with my database but it will not disply the itemcode..
hope u can help me

[mar_zim]

no need to put do

while drbackview.Read
'do your stuff
end while

[Memnoch1207]

Dim Conn As OleDbConnection
Dim Cmd As OleDbCommand
Dim reader As OleDbReader
Dim itemCode As String
 
Conn = New OleDbConnection("Your database ConnectionString")
Cmd = New OleDbCommand("SELECT item_code FROM warehouse_mst WHERE jpn ='" & qjpn2 & "'", Conn)
 
Try
   Conn.Open()
   reader = Cmd.ExecuteScalar()
 
   If reader.HasRows()
      itemcode = reader("item_code").ToString()
   End If
 
   MsgBox(itemcode)
 
   reader.Close()
Catch ex As Exception
   MsgBox(ex.Message())
Finally
   Conn.Close()
End Try

[r3sann]

helo

id try it but i did not work..

im using odbc driver

[r3sann]

helo

id try it but i did not work..

im using odbc driver

[r3sann]

table format :

item_code jpn

000001 2222
000002 2222

then i want to get the item_code if the txtjpn s equal to the jpn from the table

how should i do that?


thanks

[Memnoch1207]

Why don't you just use OLEDB, it's faster?

[kleinma]

if you are using a datareader you need to call the read method to get the first record