ArchiveToDate(
Stamp: DateTime;
FileName: String;
[Callback: IAuditLogArchiveCallback = Null];
[Format: AuditLogArchiveFormat = 0]);
Stamp - дата, ограничивающая последние записи, которые будут архивироваться.
FileName - наименование файл.
Callback - объект, используемый для отслеживания процесса архивации протокола доступа.
Format - формат файла, в который осуществляется сохранение.
ClearLog - параметр, определяющий буду ли удаляться записи из протокола доступа после архивации. По умолчанию установлено значение False, при этом записи не удаляются. Если установить значение True, то после архивации все сохраненные записи будут удалены из протокола доступа.
Метод ArchiveToDate производит архивирование протокола доступа в файл, наименование которого передаются посредством параметра FileName.
В файл архивируются записи, начиная с самой первой и заканчивая последней записью, дата которой меньше даты, передаваемой посредством параметра Stamp.
Sub Main;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
AL: IAuditLog;
Begin
MB := MetabaseClass.Active;
MS := MB.Security;
Al := MS.OpenAuditLog;
AL.ArchiveToDate(Stamp := DateTime.ComposeDay(2009, 03, 25), FileName := "c:\Gurnal_Part.csv", Format := AuditLogArchiveFormat.CSV, ClearLog := True);
End Sub Main;
После выполнения примера записи протокола доступа, начиная самой первой и заканчивая последней записью, дата которой меньше "01.03.2009", будут сохранены в файл "Gurnal_Part.csv". После сохранения данные записи будут удалены из протокола доступа текущего репозитория.
См. также: