Как вы хотите открывать ссылки такого типа (http)

begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
if not IsWOW64
 then
  begin
   SearchRootkit(true, true);
   SetAVZGuardStatus(True);
  end;
 QuarantineFile('C:\Users\User1\AppData\Local\ZetaGamesNews\zeta.exe', '');
 DeleteFile('C:\Users\User1\AppData\Local\ZetaGamesNews\zeta.exe', '32');
 DeleteFile('C:\Program Files (x86)\IObit\IObit Uninstaller\IObitUninstaler.exe', '32');
 DeleteFile('C:\Windows\Tasks\Uninstaller_SkipUac_User1.job', '32');
 DeleteFile('C:\Windows\system32\Tasks\livesnews', '64');
 DeleteFile('C:\Windows\system32\Tasks\Uninstaller_SkipUac_User1', '64');
 DeleteFileMask('C:\Users\User1\AppData\Local\ZetaGamesNews\', '*.*', true);
 DeleteDirectory('C:\Users\User1\AppData\Local\ZetaGamesNews\');
 DeleteFileMask('C:\Program Files (x86)\IObit\', '*.*', true);
 DeleteDirectory('C:\Program Files (x86)\IObit\');
 ExecuteFile('schtasks.exe', '/delete /TN "Uninstaller_SkipUac_User1" /F', 0, 15000, true);
 ExecuteFile('schtasks.exe', '/delete /TN "livesnews" /F', 0, 15000, true);
 DelBHO('{789FE86F-6FC4-46A1-9849-EDE0DB0C95CA}');
 DelBHO('{2670000A-7350-4f3c-8081-5663EE0C6C49}');
 DelBHO('{219C3416-8CB2-491a-A3C7-D9FCDDC9D600}');
 RegKeyParamDel('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Run', 'ZetaGamesNews');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
RebootWindows(true);
end.

begin
CreateQurantineArchive('c:\quarantine.zip');
end.