2016-06-11 4 views
0

On Error Resume Next:Как я могу автоматически войти на сайт с помощью vbscript?

Const PAGE_LOADED = 4 

Set objIE = CreateObject("InternetExplorer.Application") 
Call objIE.Navigate("http://172.25.25.32:8090/") 

objIE.Visible = True 

Do Until objIE.ReadyState = PAGE_LOADED : Call WScript.Sleep(100) : Loop 

objIE.Document.all.Username.Value = "ashishgi" 
objIE.Document.all.Password.Value = "apac2015#" 

If Err.Number <> 0 Then 
    msgbox "Error: " & err.Description 
End If 

Call objIE.Document.all.gaia_loginform.submit 

Set objIE = Nothing 
+0

Скрипт отлично работает, но не может нажать кнопку «Войти» на странице. – Ashish

ответ

0

gaia_loginform является "формой идентификатор" в Gmail. Посмотрите здесь: http://i.imgur.com/45H7pKP.jpg.

Теперь я думаю, вы должны получить имя/идентификатор формы сайта (путем просмотра источника), чтобы скрипт мог нажать кнопку входа в систему.

Смежные вопросы