0
Set B = CreateObject("WScript.Shell")

B.run "https://mail.ru"

WScript.Sleep 1000

Dim mailbox__login : Set mailbox__login = B.document.getElementById("mailbox__login")

Dim mailbox__password : Set mailbox__password = 
B.document.getElementById("mailbox__password")

Dim form_submit : Set form_submit = B.document.forms(0)

mailbox__login.value="Пароль" 

mailbox__password.value=" " 

form_submit.Submit
MsgBox "Вы вошли в почту."
2
  • Отправьте запрос и отредактируйте файл с куками.
    – user207618
    25 мар 2017 в 8:17
  • Вам нужен Webdriver, правда Я.Браузер он не поддерживает, да и про VBS не уверен... Но по назначению очень похоже.
    – user181100
    25 мар 2017 в 9:31

0

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge you have read our privacy policy.

Посмотрите другие вопросы с метками или задайте свой вопрос.