On Error Resume Next:
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 :(得分:0)
gaia_loginform
是&#34;表单ID&#34;的Gmail。看看这里:http://i.imgur.com/45H7pKP.jpg。
现在我认为您应该获取网站的表单名称/ ID(通过查看源代码),以便脚本可以点击登录按钮。