Seria como hacerlo desde el access, que seria compactar y reparar base de datos desde el menu herramientas.
La idea es que elimine toda la basura interna que quedo asi la base no sigue ocupando espacio cuando se elimina un registro
Comienza a probar con esto
oAccess = CREATEOBJECT('Access.Application')
oAccess.CurrentData = 'c:\mibase.mdb'
oAccess.OpenCurrentDatabase('c:\mibase.mdb')
oAccess.CompactRepair('c:\mibase.mdb','c:\base2')
Estube haciendo ciertas pruebas con automatizacion, el caso es que estoy algo ocupado ahora, pero lo que hice fue darte la idea, el intellisence de VFP te ayudara.