FoxPro/Visual FoxPro - COMBOS CONECTADOS A UNA DB RELACIONAEDA

EL PROBLEMA ES EL SIGUIENTE.............

tengo un combo que viene desde una DB el cual contiene las provincias del pais, quiero que al seleccionar una provincia de este combo me active otro unicamente conteniendo los municipios pertenecientes a esa provincia.

si tiene alguien algun ejemplo practico que me puedan enviar se lo agradeceria.

HOLA
POR KE NO USAS ALGO ASI...

DO CASE

CASE thisform.spinner1.value=1
thisform.combo1.rowsource="014,020,036,042,051,067,081"

CASE thisform.spinner1.value=2
thisform.combo1.rowsource="006,017,018,027,044,046,052,068,071"

CASE thisform.spinner1.value=3
thisform.combo1.rowsource="015,022,035,038,070,072,086,087"


ENDCASE

ESPERO TE SIRVA.....SINO DIME..OK??

otra opcion:

en el combobox provincia escribe esto:

IF Thisform.combo1.Value="provincia1"
SELECT 2
set filter to provincia=provincia1
else
IF Thisform.combo1.Value="provincia2"
SELECT 2
set filter to provincia=provincia2
else
endif
endif

Ya en el lost focus del combo municipio escribe esto:

select 2
set filter to

Suerte►

Note;
Esto si no existen muchas provincias...

otra opcion:

en el combobox provincia escribe esto:

IF Thisform.combo1.Value="provincia1"
SELECT 2
set filter to provincia=provincia1
else
IF Thisform.combo1.Value="provincia2"
SELECT 2
set filter to provincia=provincia2
else
endif
endif

Ya en el lost focus del combo municipio escribe esto:

select 2
set filter to

Suerte►

Note;
Esto si no existen muchas provincias...

ok esto en ke propiedad de combo provincia debo colocarlo.....?

en las propiedades:

* Lost Focus
* Valid

del combo1 (provincia)

Suerte►

es muy facil

en el combo2 de los municipios coloca en las propiedades Rowsourcetype=instruccion sql

en el evento interactive change del combo 1(provincias) coloca esto:

public cod as integer
with thisform

cod = val(.combo1.value)
.combo2.rowsource = "select nombre_municipio into cursor muni from nombre_tabla where cod = cod_municipio"
.combo2.refresh

endwith

en las propiedades del combo 1 has lo siguiente:

boundcolumn = 2
esto creo q ya lo tienes:
rowsource=nom_tabla.nom_municipios,cod_municipio
rowsourcetype=campos

espero te sirva de algo suerte!