[beve]

Это программа проверяющая наличие интернета на компьютере... »

Если просто нужно проверить наличие инета, то можно попроще:

Код:

#include <Inet.au3>
If _GetIP()<>-1 Then
    MsgBox(0, "Сообщение", "Все в порядке, интрернет работает",10)
    Exit
Else
    $1=MsgBox(20, "Yes or No Inet ?","К сожалению, сейчас Интернет на вашем компьютере НЕ РАБОТАЕТ. Сообщить, если Интернет будет работать?")
EndIf
;
If $1==6 Then
While 1
    sleep(5000)
    If _GetIP()<>-1 then
    Beep(1000,100)
    MsgBox(64, "Yes or No Inet ?","Интернет РАБОТАЕТ =) Время подключения: " & @hour &":"& @min &":"&@sec,10)
    Exit
    EndIf
WEnd
EndIf