tdbcombo
Publicado por Guille (1 intervención) el 28/11/2008 16:15:45
les pongo el codigo para que sea mas claro...se que no es perfecto pero bueno!!
Private Sub cargadetalle(cla As Integer)
"cargo el tdbcombo"
Dim rabo As New ADODB.Recordset
rabo.Open "select * from tabla2", dsdb, adOpenDynamic, adLockOptimistic
Set Adodc2.Recordset = rabo
"cargo el recorset"
Dim RINS As New ADODB.Recordset
RINS.Open "SELECT * FROM tabla WHERE campo_id =" & dato & "' ", dsdb,adOpenDynamic, adLockOptimistic
yo cargo este recordset con un solo registro de varios campos, un campo de este registro lo tengo en un tdbcombo que carge anteriormente como se ve en el codigo, ahora la duda es.. como hago para que el tdbcombo me seleccione y muestre el mismo dato que tengo en el registro cargado??
espero ser claro!!
Private Sub cargadetalle(cla As Integer)
"cargo el tdbcombo"
Dim rabo As New ADODB.Recordset
rabo.Open "select * from tabla2", dsdb, adOpenDynamic, adLockOptimistic
Set Adodc2.Recordset = rabo
"cargo el recorset"
Dim RINS As New ADODB.Recordset
RINS.Open "SELECT * FROM tabla WHERE campo_id =" & dato & "' ", dsdb,adOpenDynamic, adLockOptimistic
yo cargo este recordset con un solo registro de varios campos, un campo de este registro lo tengo en un tdbcombo que carge anteriormente como se ve en el codigo, ahora la duda es.. como hago para que el tdbcombo me seleccione y muestre el mismo dato que tengo en el registro cargado??
espero ser claro!!
Valora esta pregunta
0