#include call ("wikalogin") Func wikalogin() Global $oIE = _IECreate ("http://www.wika360.com") Local $username = _IEGetObjByName($oIE, "UserName") Local $password = _IEGetObjByName ($oIE, "Password") _IEFormElementSetValue ($username, "users email address") _IEFormElementSetValue ($password, "users password") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{TAB}") sleep (250) send ("{Space}") EndFunc