SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Jorge López en Miércoles 15 de Enero de 2003, 13:14
-
Hola a todos...
Como Puedo hacer para que los datos de mi campo "Nombre"de mi tabla "productos", estos nombres los pueda ver en un listbox ?, es decir que cuando cargue el form que tiene el listbox, aparezcan los nombres de los productos alli...
saludos...
-
Private Sub Form_load ()
Dim rsProductos As New Adodb.RecordSet, strSql as String, conexion as String
strSql = "SELECT Nombre FROM Productos"
conexion = ' Lo tendras que igualar a la cadena conexion que te convenga dependiendo de la base de datos con la que vas a atacar.
'Aqui abres el recordset con la consulta especificada anteriormente de SQL
rsProductos.Open strSql, conexion, 3 ,1
'Bucle donde cargarás el listbox
Do while rsProductos.EOF
Nombrelistbox.addItem rsProductos("Nombre")
rsProductos.MoveNext
Loop
rsProductos.close
Set rsProductos = Nothing
End Sub
Esto funciona perfectamente, lo único que tienes que hacer es poner en conexión la cadena de conexion correspondiente a la base de datos con la que vas a atacar.
Un saludo,
Roberto García