1. Am folosit codul pentru automatizarea salvarii/restaurarii datelor din FAQs. Functioneaza, insa rutina de mai jos afiseaza intai mesajul si apoi face salvarea. La salvarea pe discheta, acest lucru e vizibil si pare ciudat. Mai mult, as vrea sa verifica prin program daca salvarea s-a efectuat, insa daca dau FILE() nu imi gaseste nimic, pentru ca fisierul apare la cateva secunde.

DECLARE INTEGER WinExec IN kernel32 ;

STRING lpCmdLine ,;

INTEGER uCmdShow

MESSAGEBOX("Datele au fost salvate in fisierul"+CHR(13)+numele)

2. Cum pot afla data si ora unui fisier salvat, pentru a putea afisa un mesaj de genul "Doriti sa efectuati restaurarea fisierului nnn.cab, salvat in data de 17/08/2007, la ora 09.44"?

calea1=ALLTRIM(SYS(5))+ALLTRIM(SYS(2003))

SET DEFA TO SYS(5)+ SYS(2003)+[\fisiere\]

DECLARE INTEGER WinExec IN kernel32 ;

STRING lpCmdLine ,;

INTEGER uCmdShow

SET DEFA TO &calea1

IF FILE(numele)=.t.

MESSAGEBOX("Datele au fost salvate in fisierul"+CHR(13)+numele)