Запуск рекламы в новых вкладках браузера

begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
 QuarantineFileF('c:\users\gluk\appdata\roaming\ice book reader professional russian\ctfhost', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 ,0);
 QuarantineFileF('c:\users\gluk\appdata\local\fileviewpro\realtek hd', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 ,0);
 QuarantineFile('C:\Users\gluk\AppData\Roaming\ICE Book Reader Professional Russian\Ctfhost\ctfhost.exe', '');
 QuarantineFile('C:\Users\gluk\AppData\Local\FileViewPro\Realtek HD\rthdcpl.exe', '');
 ExecuteFile('schtasks.exe', '/delete /TN "CTF Host" /F', 0, 15000, true);
 ExecuteFile('schtasks.exe', '/delete /TN "InternetAA" /F', 0, 15000, true);
 ExecuteFile('schtasks.exe', '/delete /TN "Realtek HD Audio" /F', 0, 15000, true);
 DeleteFile('C:\Users\gluk\AppData\Roaming\ICE Book Reader Professional Russian\Ctfhost\ctfhost.exe', '32');
 DeleteFile('C:\Users\gluk\AppData\Local\FileViewPro\Realtek HD\rthdcpl.exe', '32');
 DeleteFileMask('c:\users\gluk\appdata\roaming\ice book reader professional russian\ctfhost', '*', true);
 DeleteFileMask('c:\users\gluk\appdata\local\fileviewpro\realtek hd', '*', true);
 DeleteDirectory('c:\users\gluk\appdata\roaming\ice book reader professional russian\ctfhost');
 DeleteDirectory('c:\users\gluk\appdata\local\fileviewpro\realtek hd');
ExecuteSysClean;
 ExecuteWizard('SCU', 2, 3, true);
 CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
RebootWindows(true);
end.