Код:
begin
TerminateProcessByName('c:\programdata\logic handler\set.exe');
StopService('backlh');
QuarantineFileF('c:\programdata\quotenamron', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', false, '', 0 , 0);
QuarantineFile('c:\programdata\logic handler\set.exe', '');
QuarantineFile('C:\ProgramData\Quotenamron\Quotenamron.exe', '');
QuarantineFile('C:\ProgramData\Quotenamron\Stockstrong.dll', '');
QuarantineFile('C:\Users\Dell\AppData\LocalLow\SearchGo\searchgo.dll', '');
QuarantineFile('C:\Users\Dell\AppData\Local\Mail.Ru\Sputnik\IESearchPlugin.dll', '');
QuarantineFile('C:\Users\Dell\AppData\Local\SearchGo\searchgo.exe', '');
QuarantineFile('C:\Users\Dell\AppData\Local\FilterStart\FilterStart.exe', '');
DeleteFile('c:\programdata\logic handler\set.exe', '32');
DeleteFile('C:\ProgramData\Quotenamron\Quotenamron.exe', '32');
DeleteFile('C:\ProgramData\Quotenamron\Stockstrong.dll', '32');
DeleteFile('C:\Users\Dell\AppData\LocalLow\SearchGo\searchgo.dll', '32');
DeleteFile('C:\Users\Dell\AppData\Local\Mail.Ru\Sputnik\IESearchPlugin.dll', '32');
DeleteFile('C:\Users\Dell\AppData\Local\SearchGo\searchgo.exe', '32');
DeleteFile('C:\Users\Dell\AppData\Local\FilterStart\FilterStart.exe', '32');
DeleteService('backlh');
DeleteService('Quotenamron');
DeleteFileMask('c:\programdata\logic handler', '*', true);
DeleteFileMask('c:\programdata\quotenamron', '*', true);
DeleteFileMask('c:\users\dell\appdata\locallow\searchgo', '*', true);
DeleteFileMask('c:\users\dell\appdata\local\mail.ru', '*', true);
DeleteFileMask('c:\users\dell\appdata\local\searchgo', '*', true);
DeleteFileMask('c:\users\dell\appdata\local\filterstart', '*', true);
DeleteDirectory('c:\programdata\logic handler');
DeleteDirectory('c:\programdata\quotenamron');
DeleteDirectory('c:\users\dell\appdata\locallow\searchgo');
DeleteDirectory('c:\users\dell\appdata\local\mail.ru');
DeleteDirectory('c:\users\dell\appdata\local\searchgo');
DeleteDirectory('c:\users\dell\appdata\local\filterstart');
DelBHO('{598AEFC6-DD3C-4A63-9AC3-53FCF6155931}');
DelBHO('{8E8F97CD-60B5-456F-A201-73065652D099}');
DelBHO('{2BC46CFA-4B00-4193-A7BD-6AD1D0BCB5BC}');
ExecuteFile('schtasks.exe', '/delete /TN "SearchGo Task" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Trusted Translator Manager" /F', 0, 15000, true);
RegKeyParamDel('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Run', 'hrormevvns');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteRepair(4);
ExecuteRepair(3);
ExecuteWizard('SCU', 2, 2, true);
RebootWindows(true);
end.
Компьютер перезагрузится.