Visual Basic - Datacombos relacionados

Life is soft - evento anual de software empresarial
 
Vista:

Datacombos relacionados

Publicado por Optimus_Primitivus (4 intervenciones) el 25/07/2007 20:03:24
Buenas...

Mi pregunta es como puedo relacionar dos datacombos, es decir, como hago que al elegir una opcion de un datacombo, en el otro datacombio solo me aparezca la informacion que se relacione al primer datacombo.

Tengo una base de datos como sigue:

Id_Estado
Estado

Id_Estado
Id_Municipio
Municipio

Un ejemplo de lo que necesito es lo siguiente: que si oprimo en el primer datacombo algun estado, en el siguiente datacombo,solo me aparezcan los municipios que correspondan a este estado.

Espero me puedan ayudar!!!!!!!!!!!!!!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Datacombos relacionados

Publicado por Madero (6 intervenciones) el 25/07/2007 23:08:41
todavia no entiendo poque ponen dos foros usno de visual basic y otro de visual basic avanzado si la gente pregunta lo mismo en uno que en otro
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Datacombos relacionados

Publicado por Jasall (6 intervenciones) el 25/07/2007 23:44:21
Buenas, lo puedes hacer tambien con 2 combobox. y 1 data. utiliza el tag para guardar id del estado y luego poder utilizarlo para filtar el combo de los municipios.

Para llenarlos:

Sub llenar()
With Data1
.RecordSource = "Select Estado,id_estado from estados"
.Refresh

Cb_Estados.Clear
Cb_Estados.AddItem "< Estados >"
Cb_Estados.ListIndex = 0

Cb_Municipios.Clear
Cb_Municipios.AddItem "< Municipios >"
Cb_Municipios.ListIndex = 0

Do While Not .Recordset.EOF

Cb_Estados.AddItem .Recordset!estado
Cb_Estados.Tag = .Recordset!id_Estado
.Recordset.MoveNext

Loop

.RecordSource = "Select Municipio,id_estado from Municipios"
.Refresh

Do While Not .Recordset.EOF

Cb_Municipios.AddItem .Recordset!Municipio
Cb_Municipios.Tag = .Recordset!id_Estado
.Recordset.MoveNext

Loop

End With
End Sub

para filtrar los municipios.

Private Sub Cb_Estados_Click()
Data1.RecordSource = "Select Municipio,id_estado from Municipios where id_Estado = '" & Cb_Estados.Tag & "'"
Data1.Refresh

Cb_Municipios.Clear

Do While Not Data1.Recordset.EOF

Cb_Municipios.AddItem Data1.Recordset!Municipio
Cb_Municipios.Tag = Data1.Recordset!id_Estado
Data1.Recordset.MoveNext

Loop
End Sub

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Datacombos relacionados

Publicado por NUEVO "EL ORIGINAL" (8 intervenciones) el 26/07/2007 17:01:29
Para vos Jasal, lo que propones es cualquier cosa menos la solucion que pide el forero, te pido que leas la nota anterior relacionada ya que es algo muy simple.

te sugiero que leas un poco mas ...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Datacombos relacionados

Publicado por Jasall (6 intervenciones) el 26/07/2007 19:01:50
Buenas : NUEVO "EL ORIGINAL" , lo que pasa es que :Optimus_Primitivus no esta contento con lo que le contestan ya que si miras en el foro Visual Basic ya fue contestado, y no contento se vino a este foro a volver a preguntar por lo mismo, yo solo le daba una alternativa.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Datacombos relacionados

Publicado por ivan (1039 intervenciones) el 26/07/2007 19:10:39
y yo te segiero que leas la respuesta que te dieron a la nota anterior relacionada.

ORIGINAL Y GENUINO!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar