PROBLEMAS CON COMBOBOX

[Nestor Pérez]

Que tal amigos, despues de un tiempo sin visitarles les saludo, con un
problemita, anteriormente solicite que me ayudaran con un COMBOBOX al
que queria que aparecieran los datos de una tabla, con sus sugerencias
lo logre, pero tengo otro problema cuando ejecuto alguna funcion de
cualquiera de los botones que e creado me da el siguiente error:

Cannot access the selected table

Al darle click en el boton aceptar de la ventana de este error se
cierra el COMBOBOX y ya no se muestra en pantalla, serian tan amables
de indicarme que fue lo que realice mal, en las propiedades del COMBO
modifique lo siguiente.

controlSurce=proveedores.proveedor
Columnconunt=2
RowSurce=proveedores
RowSurcetype=alias

Por su ayuda muy agradecido

[Armando Rodríguez]

Si hiciste un copiar y pegar el texto que nos presentas en tu correo creo
que es por gramática.

controlSurce=proveedores.proveedor
CONTROLSOURCE

Columnconunt=2
COLUMNCOUNT
RowSurce=proveedores
ROWSOURCE
RowSurcetype=alias
ROWSOURCETYPE

ojalá sea eso.

Saludos.
Armando R.

[Carlos Miguel FARIAS]

la propiedad es rowsource no rowsurce, y creo que el valor debería ir entre comillas/apostrofes, salvo que sean variables.

2009/5/7 Armando Rodríguez <armandor...@hotmail.com>

[Cristobal]

Ese problema suele sucede cuando la base de datos o el cursor al que esta
ligado el combo, se ha cerrado.
Yo lo manejo de la siguiente manera:

*-- Limpiar el contenido anterior
MiCombo.RowSourceType = 0
MiCombo.Clear

*-- Llenar el combo
MiCombo.ControlSource
MiCombo.ControlSource = "MiTabla.Campo1, MiTabla.Campo2"

--------------------------------------------------
From: "Nestor Pérez" <nestorp...@gmail.com>

Sent: Thursday, May 07, 2009 3:58 PM
To: "Mundo Visual FoxPro" <mundovis...@googlegroups.com>
Subject: [Mundo Visual FoxPro] PROBLEMAS CON COMBOBOX

>

[Mario Torrealba]

Tienes  que  limpiar el  combo para que no  te  de  el  error,  eso  es  que pierde la relacion con el  combo

yo  uso  el  combo asi

ColumnCount 5
ColumnWidths  190,40,190,80,100

RowSource  clientes.nombre, codcli, domicilio, telefono1,rif
RowSourceType  6 - Fields

en  el  InteractiveChange agarro los  valores asi

DODEFAULT()
thisform.framey1.page2.mnombre.Value=ALLTRIM(thisform.framey1.page2.mcliente.ListItem(thisform.framey1.page2.mcliente.ListItemId,1))
thisform.framey1.page2.mdomicilio.Value=ALLTRIM(thisform.framey1.page2.mcliente.ListItem(thisform.framey1.page2.mcliente.ListItemId,3))
thisform.framey1.page2.mtelefono.Value=ALLTRIM(thisform.framey1.page2.mcliente.ListItem(thisform.framey1.page2.mcliente.ListItemId,4))
thisform.framey1.page2.mrif.Value=ALLTRIM(thisform.framey1.page2.mcliente.ListItem(thisform.framey1.page2.mcliente.ListItemId,5))
thisform.Refresh

cuando  salgo  de la forma  blanqueo los  combos asi  ponlo en tu  boton  de cerrar

pb_cerrar   click()

WITH thisform.framey1.page1
    FOR I =1 TO  .ControlCount
        IF LEFT(.CONTROLS(I).BASECLASS,5)='Combo'
            .CONTROLS(I).rowsource=""
        ENDIF
    ENDFOR
ENDWITH
*
WITH thisform.framey1.page2
    FOR I =1 TO  .ControlCount
        IF LEFT(.CONTROLS(I).BASECLASS,5)='Combo'
            .CONTROLS(I).rowsource=""
        ENDIF
    ENDFOR
ENDWITH
*
DODEFAULT()

Bueno  aqui  porque uso  varios  frames dentro  de la forma

Con esto  se me quito el  problema  de Cannot access the selected table

2009/5/8 Cristobal <galvan_c...@hotmail.com>