#include <IE.au3>

Call ("signIn")

Func signIn ()
global $oIE = _IECreate ("https://www.olivianet.dk/test-og-sjov/dit-valg/afstemning/olivia-topmodel-2018-nastved-storcenter/")

Local $Brugernavn = _IEGetObjByName ($oIE, "ctl00$ucHeader$ucUserMenu$txtUsername")
Local $Kodeord = _IEGetObjByName ($oIE, "ctl00$ucHeader$ucUserMenu$txtPassword")
Local $button = _IEGetObjByName ($oIE, "ctl00$ucHeader$ucUserMenu$btnLogin")

_IEFormElementSetValue ($Brugernavn, "Joni0912")
_IEFormElementSetValue ($Kodeord, "Jonas2002")

_IEAction ($button, "Click")

EndFunc

Sleep(5000)

Call ("vote")

Func vote ()
Local $vote = _IEGetObjByName ($oIE, "ctl00$Content$ctl00$ctl00$ucPicturePollcontrol$rptPicturePollContents$ctl35$btnPictureVote")

_IEAction ($vote, "Click")

EndFunc

Sleep(5000)

Call ("repeat")

Func repeat ()
Local $voteagain = _IEGetObjByName ($oIE, "ctl00$Content$ctl00$ctl00$ucPicturePollcontrol$btnShowVoteView")

_IEAction ($voteagain, "Click")

EndFunc