Код:
begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
ClearQuarantineEx(true);
QuarantineFileF('c:\programdata\microsoft\adobe\flash player\450e3084-eaf2-4555-a2aa-0224c8595aeb', '*', true, '', 0 , 0);
QuarantineFileF('c:\users\fox\appdata\local\microsoft\extensions', '*', true, '', 0 , 0);
QuarantineFile('C:\ProgramData\Microsoft\Adobe\Flash Player\450E3084-EAF2-4555-A2AA-0224C8595AEB\844B2A2B-DFBB-4552-80F9-9F9E82E923B2.exe', '');
QuarantineFile('C:\Users\Fox\AppData\Local\Microsoft\Extensions\extsetup.exe', '');
DeleteFile('C:\ProgramData\Microsoft\Adobe\Flash Player\450E3084-EAF2-4555-A2AA-0224C8595AEB\844B2A2B-DFBB-4552-80F9-9F9E82E923B2.exe', '32');
DeleteFile('C:\Users\Fox\AppData\Local\Microsoft\Extensions\extsetup.exe', '32');
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\extsetup" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\SafeBrowser" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\A450E3084-EAF2-4555-A2AA-0224C8595AEB" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\extsetup" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\SafeBrowser" /F', 0, 15000, true);
DeleteFileMask('c:\users\fox\appdata\local\microsoft\extensions', '*', true);
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Run', '450E3084-EAF2-4555-A2AA-0224C8595AEB');
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Run', 'SafeBrowser');
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;
ExecuteWizard('SCU', 2, 3, true);
RebootWindows(true);
end.