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
