#RequireAdmin
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Ie.au3>
#include <inet.au3>

$browser2 = _IECreateEmbedded()

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("[S4L] Next In-Game Trainer Thanks Checker", 592, 349, 189, 122)
GUISetBkColor(0xCFCFCF)
$Input1 = GUICtrlCreateInput("", 272, 16, 121, 21)
$Input2 = GUICtrlCreateInput("", 272, 48, 121, 21, $ES_PASSWORD)
$Label1 = GUICtrlCreateLabel("Your Username :", 184, 16, 83, 17)
$Label2 = GUICtrlCreateLabel("Your Password :", 184, 48, 81, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Show Your Password", 272, 72, 121, 17)
$Button1 = GUICtrlCreateButton("Login", 400, 48, 91, 25)
$Button2 = GUICtrlCreateButton("To Continue Click Here", 152, 320, 331, 25)
$Obj1 = GUICtrlCreateObj($Browser2, 6, 96, 580 ,220)
GUISetState(@SW_SHOW)
$FUCK = _IENavigate ($Browser2, "http://www.elitepvpers.com/forum/login.php?do=login")
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		 Case $Button1
            _Login(guictrlread($input1),guictrlread($input2))
	EndSwitch
 WEnd


Func _Login($User,$Pass)
   Sleep(950)
$oForm = _IEFormGetCollection($Browser2, 0)
$button = _IEFormGetCollection($oForm, 0)
Local $username = _IEGetObjByName ($oForm, "vb_login_username")
Local $password = _IEGetObjByName ($oForm, "vb_login_password")
   Local $Name = _IEGetObjByName ($oform,"navbar_username")
_IEFormElementSetValue($username,$User)
_IEFormElementSetValue($password,$Pass)
_IEFormSubmit($button, 0)
   _IELoadWait($oForm)
   Sleep(5000)
   MsgBox(0,"",$username)
EndFunc