If !IsObject(ie)
	ie := ComObjCreate("InternetExplorer.Application")
ie.Visible := true
ie.Navigate("https://m.vk.com/login?role=fast&to=&s=1")
IELoad(ie)
ie.document.getElementsByName("email")[0].Value := "email"
ie.document.getElementsByName("pass")[0].Value := "pass"
ie.document.getElementsByClassName("button wide_button")[0].Click()
Return

IELoad(Pwb)
{
	While !(Pwb.busy)
		Sleep, 100
	While (Pwb.busy)
		Sleep, 100
	While !(Pwb.document.Readystate = "Complete")
		Sleep, 100
}

document.querySelector("input[value='Войти']")

document.querySelector("input[type='submit']")

wb := ComObjCreate("InternetExplorer.Application") ; Основа всего
wb.Visible := True ; Видимость окна
wb.Navigate("https://m.vk.com/login?role=fast&to=&s=1") ; Переходит по ссылке
IELoad(wb) ; ждем загрузки страницы
IELoad(wb)    ;You need to send the IE handle to the function unless you define it as global.
{
    If !wb    ;If wb is not a valid pointer then quit
        Return False
    Loop    ;Otherwise sleep for .1 seconds untill the page starts loading
        Sleep,100
    Until (wb.busy)
    Loop    ;Once it starts loading wait until completes
        Sleep,100
    Until (!wb.busy)
    Loop    ;optional check to wait for the page to completely load
        Sleep,100
    Until (wb.Document.Readystate = "Complete")
Return True
}
wb.Document.All.email.Value := "Login"
wb.Document.All.pass.Value := "Pass"

<input class="button wide_button" value="Войти" type="submit">

<input class="textfield" name="email" value="" type="text" placeholder="Телефон или email">