#include <IE.au3>

Call ("signIn")


Func signIn()
Local $pass = 0

while $pass < 5
  $oIE= _IECreate ("http://pb-fa.nl/walkthrough/escapetheschool.php/?level=login")
  Sleep(500)
  Local $username = _IEGetObjByName ($oIE,"name")
  Local $password = _IEGetObjByName ($oIE,"pass")
  Local $button = _IEGetObjByName ($oIE,"submit")

  _IEFormElementSetValue ($username,"test")
  _IEFormElementSetValue ($password,$pass)
  Sleep(1000)
  _IEAction ($button,"click")

  Sleep(2000)
  $test = _IEPropertyGet($oIE,"locationurl")
  if $test == "http://www.pb-fa.nl/walkthrough/escapetheschool.php/?level=account" Then
     Break ; Doesn't spot this part of the if statement
  Else
     $pass = $pass+1

     _IEQuit ($oIE) ;internet explorer doesn't close
  EndIf
wend
EndFunc