Solaris - Создание резервных копий базы данных. Класс!
1.Создание резервных копий базы данных в ручном режиме
-
Все пользователи выходят из программы, кроме пользователя на главном компьютере.
-
Пользователь на главном компьютере закрывает все открытые окна в программе. Остается открытым только главное окно программы.
-
Пользователь на главном компьютере нажимает левой кнопкой мышки на иконку:
-
Открывается окно «Подтверждение»
-
Необходимо нажать кнопку [ ДА ]
-
Открывается окно «Резервные копии базы данных»
-
В этом окне нажимается кнопка [ Создать архив ]
-
Начинается процесс резервного копирования, по окончании которого выходит информационное окно
2.Создание резервных копий базы данных из скрипта
За создание резервных копий из скрипта отвечает функция BackupDatabase(const DestinationDir :string=”) :string
Например: BackupDatabase(’g:\’);
Пример скрипта, который создает резервную копию в 4 часа утра:
var
IniFile :TIniFile;
LastDateofBackup: TdateTime;
begin
IniFile := TIniFile.create( extractfilepath(application.exename)+’automate.ini’);
if hourof(now())=4
then begin
// Проверяем дату последней архивации данных
LastDateofBackup:= IniFile.ReadDate(’GENERAL’,'LastDateofBackup’,date-1);
if dayof(LastDateofBackup)<> dayof(date)
then begin
// Создание резервной копии
BackupDatabase(’g:\’);
// Записываем а ini файл дату последней архивации.
IniFile.WriteDate(’GENERAL’,'LastDateofBackup’,date);
end;
end;
end.
Данный скрипт необходимо прописать в периодические процедуры в настройках программы.
Имя файла резервной копии базы данных будет в виде: SolarisBackup_03.06.2008-04.00.zip