TEXT TO lcSQL NOSHOW PRETEXT 15 BACKUP DATABASE DATABASE_NAME_HERE TO DISK = ARHIVE_NAME_NERE WITH NOFORMAT, INIT, SKIP, NOREWIND, NOUNLOAD BACKUP LOG DATABASE_NAME_HERE WITH NO_LOG ENDTEXT IF SQLEXEC(lnSQLh, lcSQL) < 0 AERROR(laError) MessageBox(laError[1,2]) ENDIF** restore
RESTORE DATABASE DATA_BASE_HERE FROM DISK = ACTUAL_BACKUP_DISK_FILENAME_HERE WITH FILE = 1, NOUNLOAD, REPLACEI have a query that selects last backup and use it for restore, but I am in a hurry. I promise to send it to you on sunday evening when I get back.