Код:
begin
ShowMessage('Внимание! Перед выполнением скрипта AVZ автоматически закроет все сетевые подключения.'+#13#10+'После перезагрузки компьютера подключения к сети будут восстановлены в автоматическом режиме.');
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
TerminateProcessByName('c:\program files (x86)\ucbrowser\application\5.7.16817.1002\ucagent.exe');
TerminateProcessByName('c:\program files (x86)\ucbrowser\application\ucservice.exe');
StopService('UCBrowserSvc');
DeleteService('UCBrowserSvc');
QuarantineFile('c:\program files (x86)\ucbrowser\application\5.7.16817.1002\ucagent.exe','');
QuarantineFile('C:\Program Files (x86)\UCBrowser\Application\UCBrowser.exe','');
QuarantineFile('c:\program files (x86)\ucbrowser\application\ucservice.exe','');
QuarantineFile('C:\Program Files (x86)\UCBrowser\Application\update_task.exe','');
QuarantineFile('\\?\C:\TEMP\168C.tmp.node','');
DeleteFile('c:\program files (x86)\ucbrowser\application\5.7.16817.1002\ucagent.exe','32');
DeleteFile('C:\Program Files (x86)\UCBrowser\Application\UCBrowser.exe','32');
DeleteFile('c:\program files (x86)\ucbrowser\application\ucservice.exe','32');
DeleteFile('C:\Program Files (x86)\UCBrowser\Application\update_task.exe','32');
ExecuteFile('schtasks.exe', '/delete /TN "UCBrowserUpdater" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "UCBrowserUpdaterCore" /F', 0, 15000, true);
DeleteFile('C:\Windows\Tasks\UCBrowserUpdater.job','32');
DeleteFile('C:\Windows\Tasks\UCBrowserUpdaterCore.job','32');
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);
ExecuteFile('schtasks.exe', '/delete /TN "InternetSE" /F', 0, 15000, true);
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
ExecuteRepair(1);
ExecuteWizard('SCU', 2, 3, true);
RebootWindows(true);
end.
После выполнения скрипта компьютер перезагрузится.