View Single Post
  #4 (permalink)  
Old 10-03-2009, 02:28 AM
Maki25 Maki25 is offline
Junior Member
 
Join Date: Sep 2009
Posts: 32
Default

Quote:
Originally Posted by Picard View Post
Hola Maki.
No sé si te he entendido bien, pero te adjunto un procedimiento que uso para meter en un combobox (CMBTabla) todas las tablas de una base de datos.
Ya ves uso el Reader para leer y añadir al control el elemento leído.
No sé si es eso lo que buscas, pero espero que te dé ideas.
Me parece que lo saqué del tutorial SQL de Erel.
Saludos
Picard


Sub ListaTablas
CMBTabla.Clear
cmd.CommandText = "SELECT name FROM sqlite_master WHERE type = 'table' ORDER BY name ASC" 'Finds all the tables in this database
Reader.Value = cmd.ExecuteReader
Do While reader.ReadNextRow = True
CMBTabla.Add(reader.GetValue(0))
Loop
Reader.Close
' Msgbox ("Leidas todas las tablas de la BD")
End Sub


Graciaspor responder tan rapido.

Mi problema es que quiero sacar un valor de la base de datos y colocarlo dentro de un combobox o en un textbox.
Por ejemplo, sacar de la tabla Productos-->y de la fila Tipo-->todas las que sean bebidas y que las vaya colocando dentro de un textbox o que se vayan añadiendo en un combobox.

No se si me explico bien pero en visual basic sería algo como esto:

do

Productos.movefirst

if Productos.recordset("Tipo")="Bebida" then
text2.text=data1.recordset("ID")
text3.text=data1.recordset("Tipo")
text4.text=data1.recordset("nombre") 'etc...
combo1.additem=data1.recorset("Precio")'por ejemplo con el combobox
end if
loop until Productos.EOF=true



Si no me explico me preguntas de nuevo que yo soy muy torpe.

Un saludo
Reply With Quote