Перезапуск скрипта по заголовку окна IE

[FADY]

Здравствуйте уважаемые. Накидал такой скрипт по накрутке посещений сайта. Всё бы хорошо, да не все прокси живые. Можно ли как-нибудь сделать, чтобы скрипт перезапускался когда ослик выдаёт ошибку дескать страница не доступна и прочие.

#RequireAdmin
#include <file.au3>
#include <array.au3>
#include <ie.au3>
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
Dim $aRecords
FileOpen("C:\proxy.txt")
Dim $aProxy
If Not _FileReadToArray("C:\proxy.txt",$aProxy) Then
  MsgBox(4096,"Error", " Error reading log to Array     error:" & @error)
 EndIf
FileClose("C:\proxy.txt")
 For $x = 1 to $aProxy[0]
     $rnd=random(1,$aProxy[0],1)
     $key = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings"
     $reg = RegWrite($key, "ProxyEnable", "REG_DWORD", "1")
     $reg1 = RegWrite($key, "ProxyServer", "REG_SZ", $aProxy[$rnd])
   DllCall('WININET.DLL', 'long', 'InternetSetOption', 'int', 0, 'long', 39, 'str', 0, 'long', 0)
  $oIE = _IECreate ("http://ya.ru/")
Sleep(6000)
 _IEQuit($oIE)
Next

 

[madmasles]

FADY,
Установите нужный Вам таймаут ожидания функцией _IELoadWaitTimeout() и, ИМХО, можно ничего не проверять.

 

[FADY]

Хм, не совсем Вас понимаю. В работающем скрипте параметр Sleep у меня равен 30 минутам, и получается, что если прокси оказался дохлым и ослик выдал 404-ю либо какую-то другую ошибку, скрипт эти 30 минут не работает. Вот я и хочу избежать таких простоев и тупо его перезапускать.

 

[madmasles]

FADY,

;~ ...
$sTitle = _IEPropertyGet($oIE, 'title')
ConsoleWrite($sTitle & @LF)
;~ ...

 

[FADY]

Спасибо