Mostrar registros guardados en un grid
Hola, primero que todo soy nuevo en el mundo de VFP, tengo un grid donde muestro unos datos que están en una tabla
select * ;
from tabla1 ;
where fechacita=a ;
order by hora ;
into cursor crsgrid
thisform.grid1.recordsource="crsgrid"
Cuando ingreso un registro nuevo en la tabla
select tabla1
append blank
go bottom
docp=thisform.doc.value
replace documento with docp
replace nombre with thisform.nom.value
replace telefono with thisform.telef.value
Intento mostrar los datos de la tabla en el grid, pero no me aparece el nuevo registro; note que si me salia del programa y volvía a entrar si los mostraba
Gracias por la ayuda
select * ;
from tabla1 ;
where fechacita=a ;
order by hora ;
into cursor crsgrid
thisform.grid1.recordsource="crsgrid"
Cuando ingreso un registro nuevo en la tabla
select tabla1
append blank
go bottom
docp=thisform.doc.value
replace documento with docp
replace nombre with thisform.nom.value
replace telefono with thisform.telef.value
Intento mostrar los datos de la tabla en el grid, pero no me aparece el nuevo registro; note que si me salia del programa y volvía a entrar si los mostraba
Gracias por la ayuda
1 Respuesta
Respuesta de ingesoft
1
Después de agregar o modificar en la tabla debes volver a cargar el cursor .
select * ;
from tabla1 ;
where fechacita=a ;
order by hora ;
into cursor crsgrid
thisform.grid1.recordsource="crsgrid"
select tabla1
append blank
go bottom
docp=thisform.doc.value
replace documento with docp
replace nombre with thisform.nom.value
replace telefono with thisform.telef.value
thisform.grid1.recordsource=""
select * ;
from tabla1 ;
where fechacita=a ;
order by hora ;
into cursor crsgrid
thisform.grid1.recordsource="crsgrid"
Thisform. Grid1. Refresh
select * ;
from tabla1 ;
where fechacita=a ;
order by hora ;
into cursor crsgrid
thisform.grid1.recordsource="crsgrid"
select tabla1
append blank
go bottom
docp=thisform.doc.value
replace documento with docp
replace nombre with thisform.nom.value
replace telefono with thisform.telef.value
thisform.grid1.recordsource=""
select * ;
from tabla1 ;
where fechacita=a ;
order by hora ;
into cursor crsgrid
thisform.grid1.recordsource="crsgrid"
Thisform. Grid1. Refresh
