ArrayList

[kikevar]

Buenas tardes me podrian decir como declarar y como llenar un ArrayList en Visual Basic 6 con datos de una tabla en Acces.

Lo que quiero hacer es imprimir con el comando print una serie de registros de mi base de datos, mi tabla esta asi

Código:

Folio    Cantidad     Total       Status
1            2            20           CO
2            1            10           PE
3            4            40           CO
4            3            30           CO
5            2            20           PE

Lo que quiero es que me imprima unicamente los folios con status PE

No se si el ArrayList sea la mejor opcion si saben como lo puedo hacer se los voy a agradecer mucho.

De antemano muchas gracias y espero su ayuda.

[Avellaneda]

Iniciado por kikevar

Buenas tardes me podrian decir como declarar y como llenar un ArrayList en Visual Basic 6 con datos de una tabla en Acces.

Lo que quiero hacer es imprimir con el comando print una serie de registros de mi base de datos, mi tabla esta asi

Código:

Folio    Cantidad     Total       Status
1            2            20           CO
2            1            10           PE
3            4            40           CO
4            3            30           CO
5            2            20           PE

Lo que quiero es que me imprima unicamente los folios con status PE

No se si el ArrayList sea la mejor opcion si saben como lo puedo hacer se los voy a agradecer mucho.

De antemano muchas gracias y espero su ayuda.

Hola, sólo tienes que hacer una consulta de selección, cargarla en un recordset y mostrar o imprimir el resultado.

"SELECT * FROM MiTabla WHERE Status = 'PE'"

[kikevar]

Muchas gracias Avellaneda, la situacion es que si lo ago asi solo me imprime el primer folio con ese status, como declaro para que me imprima todos los folios?

[David]

Depende de cómo leas los datos de la consulta, deberías hacerlo con un bucle haciendo sucesivas llamadas al método MoveNext del Recordset.

[Avellaneda]

Iniciado por kikevar

Muchas gracias Avellaneda, la situacion es que si lo ago asi solo me imprime el primer folio con ese status, como declaro para que me imprima todos los folios?

Coloca un control DataGrid en el form (DataGrid1), referencia una conexión (LaConexion) y un recordset ADO (rs) y coloca el siguiente código:

rs.Open "SELECT * FROM MiTabla WHERE Status = 'PE'", LaConexion
Set DataGrid1.DataSource = rs

[kikevar]

Muchas gracias por su ayuda ya quedo