
29/09/2011, 09:33
|
| | Fecha de Ingreso: junio-2011
Mensajes: 329
Antigüedad: 13 años, 7 meses Puntos: 2 | |
Respuesta: llenar list box algo asi..como esto...?..pero esta asi bien ligado al listbox..por q lo corro y se queda pensando...q estara mal.?..saludos
'Dim supid As String
For i As Integer = 0 To contactsListBox.Items.Count - 1
Dim MyCommand As System.Data.Odbc.OdbcDataAdapter = New System.Data.Odbc.OdbcDataAdapter("Select oritem_0.qtyrec FROM PUB.oritem oritem_0 WHERE ( oritem_0.onum = '" & contactsListBox.Items(i).ToString & "')", MyConnection)
Dim DS As DataSet = New DataSet
MyCommand.Fill(DS, "ord")
ListBox2.DataSource = DS.Tables("ord").DefaultView
GridView2.DataBind()
'GridView4.Visible = False |