Код:
begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
ClearQuarantineEx(true);
TerminateProcessByName('c:\windows\microsoft\svchost.exe');
QuarantineFile('c:\windows\microsoft\svchost.exe', '');
QuarantineFile('C:\Users\ekuch\AppData\Roaming\Microsoft\msi.exe', '');
QuarantineFile('C:\Users\ekuch\AppData\Local\SearchGo\searchgo.exe', '');
QuarantineFile('C:\Users\ekuch\Favorites\Links\Интернет.url', '');
QuarantineFileF('c:\users\ekuch\appdata\local\searchgo', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.ps1, *.js*, *.tmp*', true, '', 0 , 0);
DeleteFile('C:\Users\ekuch\Favorites\Links\Интернет.url');
DeleteFile('c:\windows\microsoft\svchost.exe', '32');
DeleteFile('C:\Users\ekuch\AppData\Roaming\Microsoft\msi.exe', '32');
DeleteFile('C:\Users\ekuch\AppData\Local\SearchGo\searchgo.exe', '32');
ExecuteFile('schtasks.exe', '/delete /TN "MSI" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "SearchGo Task" /F', 0, 15000, true);
DeleteService('SvcHost Service Host');
DeleteFileMask('c:\users\ekuch\appdata\local\searchgo', '*', true);
DeleteDirectory('c:\users\ekuch\appdata\local\searchgo');
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1201', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1001', 1);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1004', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '2201', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1804', 1);
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteRepair(3);
ExecuteRepair(4);
ExecuteWizard('SCU', 2, 3, true);
RebootWindows(true);
end.