Ayuda Con DBLIST, DBCOMBO y DBGRID

Iniciado por ThonyMaster, 19 Febrero 2009, 03:41 AM

0 Miembros y 1 Visitante están viendo este tema.

ThonyMaster

estoy haciendo un programita ya le ice una base de datos sencillito y tiene esto:

un a base datos pequeña q tiene tres registros y los carga en unos text.
tambien tengo un db grid para mostrar la lista de todos los productos juntos y un DBcombo en el q se muestran o se puede elegir los nombres de los productos.
pero necesito saber si hay algun code para q cuando yo seleccione un nombre de los q aparecen en el DB combo me aparezkn los demas registros de ese nombre en un DBlist!!
ejemplo:
mi base de datos es de cornetas!!

en el db combo se muestran los nombres de las cornetas.
-peavey
-Rcf
-cerwin Vega

cuando yo seleccione RCF !!

Me salga:

Vatios: 2000
Marca: RCF
Mdelo: P300

estos 3 registros ya estan en la base de datos solo qiero saber como llamarlos  a la DB list.!!!!

Gracias este foro es muy bueno si me ayudan seria muxo mejor!!!!
Sin Firma

seba123neo

Hola, cuando cargas el datacombo con los nombres , en la propiedad BoundText cargas el id mismo de la corneta asi despues llenas el list y armas la consulta segun el ID del que seleccionaste, es lo mismo que usar la propiedad ItemData del Combobox...

por ejemplo, asi se cargaria el datacombo con el nombre y el id (que no se muestra)..

Código (vb) [Seleccionar]
Private Sub Cargar()
    Dim rsCargar As ADODB.Recordset
    Set rsCargar = New ADODB.Recordset
   
    rsCargar.Open "SELECT idCorneta AS id,nombre FROM Cornetas ORDER BY nombre", TuConexion, adOpenStatic, adLockReadOnly, adCmdText
   
    Set DataCombo1.DataSource = rsCargar
    Set DataCombo1.RowSource = rsCargar
    DataCombo1.ListField = "nombre"
    DataCombo1.BoundColumn = "id"
End Sub


y despues para cargar el datalist..solo se haria esta consulta..

Código (vb) [Seleccionar]
"SELECT vatios,marca,modelo FROM Cornetas WHERE idCorneta=" & DataCombo1.BoundText

si el id es String tenes que encerrarlo entre comillas simples...

Código (vb) [Seleccionar]
"SELECT vatios,marca,modelo FROM Cornetas WHERE idCorneta='" & DataCombo1.BoundText & "'"



saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

ThonyMaster

gracias pero donde deberia ir cada code? en botones o en el combo o q?? gracias
Sin Firma