Aplicar RowSorce en Combo Con Tablas
Tengo una problemita que hace tiempo se me presento y pude resolverlo, pero ahora no recuerdo como... Es cuando crago los datos de una tabla en un combo con RowSorceType = 6 al iniciar mi form. Lo carga bien, lo utiliza bien al elegir la opción del combo... Pero cuando voy a cancelar una opción, y refrescar el inicio del form, debe volver a ejecutar el código... No me accesa nuevamente al código que carga el comobo con los datos de la tabla... El mensaje que envía dice... Cannot access the selected table. lanacionalidad. Nacionalidad, esto es urgente, necesito avanzar, y este problemita me tiene atrasado... Te agradezco tu colaboración lo antes posible
este es el código al que me refiero.
thisform.comboselect1.RowSourceType = 6
thisform.comboselect1.Clear
SELECT nacionalidad FROM nacionalidad ORDER BY nacionalidad INTO CURSOR lanacionalidad
IF RECCOUNT() > 0 THEN
thisform.comboselect1.RowSource = 'lanacionalidad.nacionalidad'
ELSE
INSERT INTO nacionalidad (idenacion, nacionalidad) VALUES (1, "*** Agregar Nueva")
thisform.comboselect1.RowSource = 'nacionalidad.nacionalidad'
ENDIF
thisform.comboselect1.ListIndex = 0
este es el código al que me refiero.
thisform.comboselect1.RowSourceType = 6
thisform.comboselect1.Clear
SELECT nacionalidad FROM nacionalidad ORDER BY nacionalidad INTO CURSOR lanacionalidad
IF RECCOUNT() > 0 THEN
thisform.comboselect1.RowSource = 'lanacionalidad.nacionalidad'
ELSE
INSERT INTO nacionalidad (idenacion, nacionalidad) VALUES (1, "*** Agregar Nueva")
thisform.comboselect1.RowSource = 'nacionalidad.nacionalidad'
ENDIF
thisform.comboselect1.ListIndex = 0
1 Respuesta
Respuesta de emmacape
1