- Сообщения
- 9,329
- Реакции
- 3,985
Протокол вроде нормальный, значит проблема только в строках скрипта по созданию лога.Вот протокол.
прописывали?только пропишите явно пути к папке с логом.
Смотрите видео ниже, чтобы узнать, как установить наш сайт в качестве веб-приложения на домашнем экране.
Примечание: Эта возможность может быть недоступна в некоторых браузерах.
Протокол вроде нормальный, значит проблема только в строках скрипта по созданию лога.Вот протокол.
прописывали?только пропишите явно пути к папке с логом.
Странно, все делается с правами админа.
AddToLog(FormatDateTime('dd.mm.yyyy',now));
может лучше хеш ? http://z-oleg.com/secur/avz_doc/script_getcomputerhash.htmа лучше с IP адресом
var
AVZLogDir : string;
Begin
CreateDirectory('\\name_server\avz4\log\'+GetComputerName);
AVZLogDir := ('\\name_server\avz4\log\'+GetComputerName);
ExecuteStdScr(2);
end.
потому что сделали винегрет, смешав куски кода из однотипных скриптов, в каждом из которых указывается свой путь к папке.В папке LOG создается папка с именем компьютера, но в папке с именем компьютера лог не записывается, не подскажете в чем может быть причина?
подставьте название папки в этот скрипт и проверяйте.осталось только подставить эти переменные в этот скрипт
Не понимаю вот этого. Что значит винегрет? В обеих строчках указывается одинаковый путь.потому что сделали винегрет, смешав куски кода из однотипных скриптов, в каждом из которых указывается свой путь к папке.
подставьте название папки в этот скрипт и проверяйте.
var
AVZLogDir : string;
begin
// Формирование имени рабочей папки
AVZLogDir := ('\\name_server\avz4\log\'+GetComputerName);
CreateDirectory(AVZLogDir);
// Настройка AVZ
SetupAVZ('EvLevel=3'); // Эвристика на максимум
SetupAVZ('ExtEvCheck=Y'); // Расширенный анализ включен
AddToLog('Запуск сканирования');
// Запуск сканирования
RunScan;
AddToLog('RunScan прошло успешно');
// Выполнение исследования системы
ExecuteSysCheck(AVZLogDir+'virusinfo_syscheck.htm');
AddToLog('ExecuteSysCheck прошло успешно');
end.
а папка с именем компьютера создаётся ?В папку LOG лог пишется, с таким именем computername_virusinfo_syscheck.htm. В целом цель достигнута но мне бы хотелось что бы в папке с логом создавалась папка с именем компьютера а туда уже писался лог.
var
AVZLogDir : string;
begin
// Формирование имени рабочей папки
AVZLogDir := ('\\name_server\avz4\log\'+GetComputerName);
CreateDirectory(AVZLogDir);
end.
var
AVZLogDir : string;
begin
// Формирование имени рабочей папки
AVZLogDir := (GetAVZDirectory+'\log\'+GetComputerName);
CreateDirectory(AVZLogDir);
end.
var
AVZLogDir : string;
begin
// Формирование имени рабочей папки
AVZLogDir := ('\\name_server\avz4\log\'+GetComputerName);
CreateDirectory(AVZLogDir);
// Настройка AVZ
SetupAVZ('EvLevel=3'); // Эвристика на максимум
SetupAVZ('ExtEvCheck=Y'); // Расширенный анализ включен
// Запуск сканирования
RunScan;
// Выполнение исследования системы
ExecuteSysCheck(AVZLogDir+'\virusinfo_syscheck.htm');
end.
да.Там в самом скрипте что ли путь прописан?