Hallo, folgendes Script funktioniert nicht:
[autoit]#include <IE.au3>
Global $lastVisited = ""
$oIE = _IECreate("http://proxcoding.tk/update-01.php")
;Illegale Webseiten
$IllWebsite = BinaryToString (InetRead("http://proxcoding.tk/ill.txt"))
;Viren Webseiten
$VirWebsite = "eicar.com"
$VirWebsite = "eicar.org"
While Sleep(10)
$sVal = _IEPropertyGet($oIE, "locationurl")
If @error Then ExitLoop
If StringInStr($sVal, $IllWebsite) > 0 And $sVal <> $lastVisited Then
$lastVisited = $sVal
SplashTextOn("","Diese Webseite enthält möglicher Weise illegalen Content!","800","50","-1","-1",33,"Arial Black","12","12")
Sleep(3000)
SplashOff()
EndIf
If StringInStr($sVal, $VirWebsite) > 0 And $sVal <> $lastVisited Then
$lastVisited = $sVal
SplashTextOn("","Auf dieser Webseite sind möglicher Weise Viren!","800","50","-1","-1",33,"Arial Black","12","12")
Sleep(3000)
SplashOff()
EndIf
WEnd
Weiss einer den Fehler?