Visual Basic - VOLCAR UNA SELECT CON ADO EN UN GRID

Life is soft - evento anual de software empresarial
 
Vista:

VOLCAR UNA SELECT CON ADO EN UN GRID

Publicado por PACO (5 intervenciones) el 09/12/2003 12:45:00
Tengo una base de datos en SQL Server y me conecto a ella mediante ADO, creo y establezco la conexión y el recordset así:

Set conexion = New ADODB.Connection
conexion.ConnectionString = \"Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Data Source=PC_PACO\"
Ins= \"SELECT * FROM PUESTOS\"
Set rstPuestos = New ADODB.Recordset
rstPuestos.Open Ins, conexion, adOpenDynamic, adLockOptimistic
rstPuestos.MoveLast
rstPuestos.MoveFirst

Como vuelco la SELECT en un Flex Grid???? si alguien me puede ayudar...

Un saludo y gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:VOLCAR UNA SELECT CON ADO EN UN GRID

Publicado por Ruben (129 intervenciones) el 16/12/2003 16:13:37
una ves que tienes el recordset (de ahora en mas "rs") lo introduces en la grilla de la siguiente manera:

dim cont as int
grilla.textmatrix(0,1)="campo1"
grilla.textmatrix(0,2)="campo2"
grilla.textmatrix(0,3)="campo3"
grilla.textmatrix(0,4)="campo4"

cont=1
rs.movefirst
while not rs.eof
grilla.textmatrix(cont,1)=rs("campo1")
grilla.textmatrix(cont,2)=rs("campo2")
grilla.textmatrix(cont,3)=rs("campo3")
grilla.textmatrix(cont,4)=rs("campo4")
cont = cont + 1
rs.movenext
wend


PROBALO Y SUERTE
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar