SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: andy2507 en Lunes 4 de Julio de 2011, 21:25
-
Hola tengo 2 tablas relacionadas mi BASE DE DATOS esta echo en ACCESS 2003
TABLA "TIENDA"
IdTienda (Autonumerico)
Nombre_Tienda (Texto)
IdDistrito (numero)
TABLA "Distrito"
IdDistrito (Autonumerico)
Nombre_Distrito (Texto)
en la tabla tienda tengo el problema al guardar datos , El DataCombo me muestra los distrito(Nombre_DIstrito) ,pero yo quisiera que cuando presione "Guardar" guarde solo el "IdDistrito" ayudeneme por favor aca les dejo el coigo que empleado
PROCEDIMIENTO QUE CREE PARA CARGAR LOS DISTRITOS AL DATACOMBO
Private Sub CargarDCB()
Dim rsDistrito As ADODB.Recordset
Set rsDistrito = New ADODB.Recordset
rsDistrito.Open "select IdDistrito,Nombre_Distrito from Distrito", cnBD, adOpenStatic, adLockReadOnly, adCmdText
Set Dcbcodist.DataSource = rsDistrito
Set Dcbcodist.RowSource = rsDistrito
Dcbcodist.ListField = "Nombre_Distrito"
Dcbcodist.BoundColumn = "IdDistrito"
End Sub
GUARDAR
Private Sub CmdGuardar_Click()
rsTienda.AddNew
rsTienda.Fields("IdTienda") = txtcodtienda.Text
rsTienda.Fields("Nombre_Tienda") = txtnombtien.Text
rsTienda.Fields("IdDistrito") = Dcbcodist.BoundColumn
End if
ESPERANDO SU PRONTA AYUDA Y COLABORACION GRACIAS