Код:
begin
ShowMessage('Внимание! Перед выполнением скрипта AVZ автоматически закроет все сетевые подключения.' + #13#10 + 'После перезагрузки компьютера подключения к сети будут восстановлены в автоматическом режиме.');
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
if not IsWOW64
then
begin
SearchRootkit(true, true);
SetAVZGuardStatus(True);
end;
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1804', 1);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '2201', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1004', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1001', 1);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1201', 3);
QuarantineFile('C:\Program Files\suptab\dpinterface32.dll','');
QuarantineFile('C:\PROGRA~1\SupTab\SEARCH~1.DLL','');
QuarantineFile('C:\Program Files\WinRST\WinRST.exe','');
SetServiceStart('IePluginService', 4);
DeleteService('IePluginService');
DeleteService('WinRST');
TerminateProcessByName('c:\programdata\iepluginservice\pluginservice.exe');
QuarantineFile('c:\programdata\iepluginservice\pluginservice.exe','');
DeleteFile('c:\programdata\iepluginservice\pluginservice.exe','32');
DeleteFile('C:\Program Files\WinRST\WinRST.exe','32');
DeleteFile('C:\Program Files\Mobogenie\DaemonProcess.exe','32');
DeleteFile('C:\PROGRA~1\SupTab\SEARCH~1.DLL','32');
RegKeyParamDel('HKEY_LOCAL_MACHINE','SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\mobilegeni daemon','command');
DeleteFile('C:\Program Files\suptab\dpinterface32.dll','32');
DeleteFileMask('c:\programdata\iepluginservice', '*', true);
DeleteDirectory('c:\programdata\iepluginservice');
DeleteFileMask('C:\Program Files\WinRST', '*', true);
DeleteDirectory('C:\Program Files\WinRST');
DeleteFileMask('C:\Program Files\Mobogenie', '*', true);
DeleteDirectory('C:\Program Files\Mobogenie');
DeleteFileMask('C:\PROGRA~1\SupTab', '*', true);
DeleteDirectory('C:\PROGRA~1\SupTab');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
RebootWindows(false);
end.
Компьютер перезагрузится.