D
поясните подробней, ошибка вылезла или что?Засорено настолько, что процесс создания логов не завершился.
Q: Во время работы AutoLogger вылезла ошибка, он прервал свою работу не отработав до конца. Что мне делать?
var PathAutoLogger, CMDLine : string;
begin
clearlog;
PathAutoLogger := Copy(GetAVZDirectory, 0, (Length(GetAVZDirectory)-4));
AddToLog(PathAutoLogger);
SaveLog(PathAutoLogger+'report3.log');
CMDLine := 'a "' + PathAutoLogger + '\Report.zip" "' + PathAutoLogger + '\report*.log"';
ExecuteFile('7za.exe', CMDLine, 0, 15000, true);
end.
begin
SearchRootkit(true, true);
SetAVZGuardStatus(True);
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
ClearQuarantineEx(true);
QuarantineFile('c:\documents and settings\Лыкова Галина\local settings\application data\lsass.exe', '');
QuarantineFile('c:\documents and settings\Лыкова Галина\local settings\application data\services.exe', '');
QuarantineFile('c:\documents and settings\Лыкова Галина\local settings\application data\winlogon.exe', '');
QuarantineFile('C:\Documents and Settings\Лыкова Галина\Главное меню\Программы\Автозагрузка\Empty.pif', '');
DeleteFile('C:\Documents and Settings\Лыкова Галина\Главное меню\Программы\Автозагрузка\Empty.pif');
DeleteFile('c:\documents and settings\Лыкова Галина\local settings\application data\winlogon.exe', '32');
DeleteFile('c:\documents and settings\Лыкова Галина\local settings\application data\lsass.exe', '32');
ClearHostsFile;
BC_ImportALL;
ExecuteSysClean;
ExecuteRepair(8);
ExecuteRepair(13);
ExecuteRepair(16);
ExecuteRepair(17);
ExecuteWizard('TSW', 2, 2, true);
ExecuteWizard('SCU', 2, 3, true);
BC_Activate;
RebootWindows(true);
end.
begin
CreateQurantineArchive(GetAVZDirectory+'quarantine.zip');
end.
%appdata%\Malwarebytes\Malwarebytes Anti-Malware\Logs
Данные реестра: 1
PUM.Disabled.SecurityCenter, HKLM\SOFTWARE\MICROSOFT\SECURITY CENTER|UpdatesDisableNotify, 1, Хорошо: (0), Плохо: (1),,[d7755e616525a98db1e95fe6cb3b0ef2]
C:\WINDOWS\system32\hidcon.exe
C:\Documents and Settings\Лыкова Галина\Application Data\Microsoft\Internet Explorer\Quick Launch\Mail.Ru.lnk
var
LogPath : string;
ScriptPath : string;
begin
LogPath := GetAVZDirectory + 'log\avz_log.txt';
if FileExists(LogPath) Then DeleteFile(LogPath);
ScriptPath := GetAVZDirectory +'ScanVuln.txt';
if DownloadFile('http://dataforce.ru/~kad/ScanVuln.txt', ScriptPath, 1) then ExecuteScript(ScriptPath) else begin
if DownloadFile('http://dataforce.ru/~kad/ScanVuln.txt', ScriptPath, 0) then ExecuteScript(ScriptPath) else begin
ShowMessage('Невозможно загрузить скрипт AVZ для обнаружения наиболее часто используемых уязвимостей!');
exit;
end;
end;
if FileExists(LogPath) Then ExecuteFile('notepad.exe', LogPath, 1, 0, false)
end.
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?