0

我正在使用 mshtml.tlb 加载/解析 html，我想扩展它以通过代码单击元素。问题是在例如之后捕获加载过程。单击了一个按钮。在我的具体情况下，我想执行用户登录。

这是我的代码：

Dim WithEvents m_doc As HTMLDocument

' load page
Set m_docNU = New HTMLDocument
Set m_doc = m_docNU.createDocumentFromUrl(m_url, vbNullString)

Do While m_doc.readyState = "loading" Or m_doc.readyState = "interactive"
DoEvents
Loop

set txtUsername = m_doc.getElementById("username")
set txtPasswort = m_doc.getElementById("passwort")
set myButton = m_doc.getElementById("submit")

myButton.click

现在这是一个大问号：如何继续 vb6- 像“等到页面加载”？我已经尝试使用 do while-loop 并检查 readyState，但由于某种原因，readyState 在单击按钮后没有改变..

有任何想法吗？

谢谢

ps：有没有比do while循环更优雅的方法？例如。使用进度条？

4

1 回答 1

0

  • 使用 vb.net

  • wBrowser 是一个网络浏览器对象

    While wBrowser.ReadyState <> WebBrowserReadyState.Complete
     Application.DoEvents()
End While
于 2011-03-31T21:09:08.363 回答