Ayudadita sobre Ado
plis una ayudadita, como hago para agregar datos de una tabla(detalle de Boleta) a un List, es decir agregar datos que tengan un mismo numero, por ejemplo agregar los articulos de la boleta nº 2 nada mas. ayudadita y le agradesco
Con una sentencia sql le dices que te seleccione todo los datos que sea igual a lo que tu quiera y se lo agrega al list
Dim sql As String
‘creo la sentencia sql
sql = "SELECT * FROM detalles_Boleta where Articulo = 2"
rs.CursorLocation = adUseClient
‘Abro la sentencia con el tipo de curso
rs.Open sql, cnn, adOpenKeyset, adLockOptimistic, adCmdText
‘Y ahora cargo Lisbox
Do While Not rs.Fields.EOF
ListBox1.AddItem rs.Fields("IdProvee")
rs.MoveNext
Loop
Dim sql As String
‘creo la sentencia sql
sql = "SELECT * FROM detalles_Boleta where Articulo = 2"
rs.CursorLocation = adUseClient
‘Abro la sentencia con el tipo de curso
rs.Open sql, cnn, adOpenKeyset, adLockOptimistic, adCmdText
‘Y ahora cargo Lisbox
Do While Not rs.Fields.EOF
ListBox1.AddItem rs.Fields("IdProvee")
rs.MoveNext
Loop
