FoxPro/Visual FoxPro - COPIAS ...

Hola ... deseo hacer una rutina para guardar 5 copias de una base de datos por fechas ... y que cuando tenga MAS de 5 copias que elimine la más antigua ... para el nombre de las copias utilizo la fecha:

FechaActualiz=Fdate("MiBase.dbf")
copia=Dtoc(FechaActualiz)
copy file MiBase.dbf to &copia..bak
nCopias=Adir(matriz,"*.bak")
if nCopias>5

&& como puedo borrar la copia más antigua

endif

Gracias

Create una tabla donde vayas guardando el nombre de los archivos que creaste y desde ahi tomas la mas antigua buscas el archio y lo borras
Si no la otra forma (si lo haces cada 5 dias) es restarle a la fecha que colocas en el nombre del archivo 5 dias y borrar el archivo