Saludos, si es que estoy implementando una plataforma en un negocio, y lamentablemente ahi no hay donde conectarme tampoco me da tiempo de entrar a contestar este foro, hoy me voy a conectar por ahi como a las 11 pm de aca.
Te mande un mail con mi propuesta de metodo refresca
IF !EMPTY(Thisform.TxtFi.Value) AND !EMPTY(Thisform.TxtFf.Value)
Thisform.grdAltashabi.recordsource = ""
SELECT * FROM altashabi;
WHERE altashabi.pagada = .F. .and. formapago = "Sin Cargo" and;
altashabi.fecha between CTOD(Thisform.TxtFi.Value) AND CTOD(Thisform.TxtFf.Value) ;
INTO CURSOR datos readwrite
Thisform.grdAltashabi.RecordSource = "datos"
ELSE
Thisform.grdAltashabi.recordsource = ""
SELECT * FROM altashabi ;
WHERE altashabi.pagada = .F. .and. formapago = "Sin Cargo" ;
INTO CURSOR datos readwrite
Thisform.grdAltashabi.RecordSource = "datos"
ENDIF
SUM importe TO thisform.text2.Value
Thisform.grdAltashabi.Refresh()