CARGAR DATOS EN COMBOBOX UTILIZANDO LA CLASE SQLDATA DESDE SQLSERVER O POSTGRESQL O MYSQL.....

260 views
Skip to first unread message

Pool

unread,
Oct 17, 2016, 4:08:44 PM10/17/16
to Comunidad de Visual Foxpro en Español
Hola Foxeros Buenas Tardes queria preguntarles si alguien esta utilizando la clase de Germán Fabricio Valdez y o a  podido cargar de datos a un combobox desde SGBD  yo lo cargo desde esta manera:

*LINEAS PARA TRAER UN CURSOR CON LOS DATOS SELECCIONADOS PARA POSTERIORMENTE SER GRABADOS LOS CAMBIOS (CONSULTAG)
LOCAL osqldata as sqldata OF sqldata.sqldata 
osqldata=CREATEOBJECT("sqldata.sqldata")

IF USED("Pais")
USE IN Pais &&es necesario que el cursor no exista antes de llamar a psqlejecutar
ENDIF 
opais=CREATEOBJECT("cursoradapter")
osqldata.psqlejecutar(_screen,"2",_screen,opais,"consultag","Pais","TbPais","select * from TbPais order by id")
CURSORSETPROP("Buffering",3,"Pais") &&por defecto es buffering 5 

y en tiempo de Diseño en la propiedades del combobox :
BoundColum =2
Rowsource=pais.pais,id
RowsourceType=6-Fields

pero resulta que cuando agrego un registro mas directamente a la tabla pais  desde el SqlServer el combo no se actuliza se que se debe a que el  cursor ya  esta cargado y quisiera saber cual 
es la mejor manera de actulizar el cursor o cargarlo de nuevo o que solo se actulizen los registros ingresados  ojale me puedan ayudar de ante mano Muchas Gracias ...



mpulla

unread,
Oct 17, 2016, 11:04:41 PM10/17/16
to Comunidad de Visual Foxpro en Español
Hola Pool.

Tienes que volver a cargar los datos, puedes poner un boton para refrescar los datos.

Saludos.
Mauricio

HernanCano

unread,
Oct 18, 2016, 1:14:52 AM10/18/16
to Comunidad de Visual Foxpro en Español
Hola.

La mejor manera de actualizar un cursor o cargarlo de nuevo es "actualizar un cursor o cargarlo de nuevo" para que se actualizen los registros ingresados.

Para ello una técnica es lo que te menciona Mauricio. Claro que si te dá pereza poner un botón para actualizar, entonces puedes usar un timer que lo haga 
automáticamente cada cierto tiempo

exl260708 .

unread,
Oct 18, 2016, 9:48:13 AM10/18/16
to publice...@googlegroups.com
Gracias Mauricio y Hernan  ..
yo he vuelto a cargar de nuevo el cursor no se si estara bien hacerlo de esta manera 

EN EL EVENTO INTERACTIVECHANGE DEL COMBOBOX
*************************************************************************
LOCAL osqldata as sqldata OF sqldata.sqldata 
osqldata=CREATEOBJECT("sqldata.sqldata")
IF USED("Pais")
USE IN Pais &&es necesario que el cursor no exista antes de llamar a psqlejecutar
ENDIF 
opais=CREATEOBJECT("cursoradapter")
osqldata.psqlejecutar(_screen,"2",_screen,opais,"consultag","Pais","TbPais","select * from TbPais order by id")
CURSORSETPROP("Buffering",3,"Pais") &&por defecto es buffering 5

lo he puesto ahi para que cada ves que el usuario este buscando un registro me cargue nuevamente el cursor no se si estará bien hacerlo de esta manera porque vuelvo a cargar nuevamente todos los datos de la tabla pero yo quisiera solo que se agregre o actulize el cursor y no se cargue nuevamente toda la tabla...
Reply all
Reply to author
Forward
0 new messages