小白一枚,在尝试用vba编写自动登陆网页时,总是运行到输入账号密码就出错,求大神指点迷津。
Sub login()
Dim ie As InternetExplorer
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.navigate ("mail.163.com")
Do While ie.readyState = READYSTATE_COMPLETE
DoEvents
Loop
Do While ie.Busy = True
DoEvents
Loop
Set doc = ie.document
Do While doc.readyState <> "complete"
DoEvents
Loop
doc.getElementById("auto-id-1635353558597").Value = "account"
doc.getElementById("auto-id-1635353558600").Value = "password"
End Sub