| ebolo |  |
|
2007-04-19 14:10 - Respuestas: 8 - Tema nº: 2444841
Hola, lo que estamos haciendo es filtrando el origen de la fila del cc611 (estados) según lo que escogemos en el cc609 (municipios).
Puedes poner en el evento afterupdate, lo siguiente para hacer una comprobación
msgbox Me.Cuadro_combinado609.Column(0)
msgbox Me.Cuadro_combinado609.Column(1)
De esta forma podemos saber que es lo que tienes en cada columna. La 2ª parte de la propiedad column la podemos obviar.
Leyendo otra vez creo que te entiendo, lo que quieres es que te aparezca en el cuadro combinado, no sólo filtrarlo si no que se muestre.
Casi para eso mejor mostrar el estado en un cuadro de texto (CT1), usando la función Dlookup.
Private Sub Cuadro_combinado609_AfterUpdate()
If Me.Cuadro_combinado609.ListIndex = -1 Then
Me.Cuadro_combinado611.RowSource = "SELECT Estado FROM Estados"
CT1=""
Else
Me.Cuadro_combinado611.RowSource = "SELECT Estado FROM Estados WHERE IdEstado=" & Me.Cuadro_combinado609.Column(1, Me.Cuadro_combinado609.ListIndex)
CT1=DLookup("[Estado]", "Estados", "IdEstado=" & Me.Me.Cuadro_combinado609.Column(1)
Me.Cuadro_combinado609=CT1
End If
Me.Requery
End Sub
Prueba a ver que pasa.
Saludos.
| |
|
|
| Kadylel |  |
|
Re: Relación de datos de un cuadro combinado a otro - 2007-04-19 21:22 - Respuesta 7
Hola de nuevo maestro Ebolo, muchas gracias por toda, toda, toda, toda tu paciencia, nos acercamos cada vez mas a lo que quiero hacer!! te comento que ya puse el código que me diste y al hacer una prueba cuando selecciono mi ciudad o municipio efectivamente aparece ya su estado correspondiente a esa ciudad o municipio en el cuadro de texto!! nada mas que el único inconveniente es que cuando selecciono mi ciudad o municipio en el mismo campo del cuadro combinado me muestra el estado y no la ciudad que seleccioné, el código que puse (espero que yo esté bien) es el siguiente:
Private Sub Cuadro_combinado609_AfterUpdate()
If Me.Cuadro_combinado609.ListIndex = -1 Then
Me.Cuadro_combinado611.RowSource = "SELECT Estado FROM Estados"
Texto613 = ""
Else
Me.Cuadro_combinado611.RowSource = "SELECT Estado FROM Estados WHERE IdEstado=" & Me.Cuadro_combinado609.Column(1, Me.Cuadro_combinado609.ListIndex)
Texto613 = DLookup("[Estado]", "Estados", "IdEstado=" & Me.Cuadro_combinado609.Column(1))
Me.Cuadro_combinado609 = Texto613
End If
Me.Requery
End Sub
Muchas gracias por todo, te debo una comida | |
|
|
| ebolo | |
|
Re: Relación de datos de un cuadro combinado a otro - 2007-04-19 22:32 - Respuesta 8
Es muy fácil ver dónde está el fallo, te doy como pista que mires que cuadro combinado es el de las ciudades y cuál el de estado, para saber cúal es el que tienes que igualar al texto613.
Saludos y si necesitas algo más lo dices.
| |
|
|
| Kadylel | |
|
Re: Relación de datos de un cuadro combinado a otro - 2007-04-19 23:41 - Respuesta 9
Eres un maestro!!!!!!!!! wow!!!! muchas gracias Ebolo de verdad me sacaste de un gran apuro, de verdad te debo una comida.
Estamos en contacto si me atoro en otra cosa del Access, sí? muchas gracias de nuevo!!!! | |
|
|
|
