相关疑难解决方法(0)

所以,我使用Excel VBA代码点击我们网站上的按钮,相信我,我知道这不是最好的事情,但它是目前我可用的最不令人反感的选择.

所以,这个选择的方式,这里是我的问题,我可以使用这个代码,成功加载imdb.com,谷歌等.但是,当我加载我们的本地网站,我失去对ie对象的控制,我不能检查readyState,我不能退出.这是我得到的错误.运行时错误'-2147023179(800706b5)':

自动化错误接口未知

每隔一段时间我就会收到此消息:运行时错误'-2147417848(80010108)':

自动化错误调用的对象已与其客户端断开连接.

单击Debug指示ie.readyState,我也尝试将其注释掉,然后指向ie.Quit

Sub dothestuff()
    Dim ie As InternetExplorer
    Set ie = New InternetExplorer
    ie.Visible = True

    ie.Navigate "http://www.google.com/"
    anerror = webload(ie)

    ie.Quit
    Set ie = Nothing
End Sub

Function webload(ie)
    Do Until ie.ReadyState = READYSTATE_COMPLETE
        DoEvents
    Loop
End Function