HTMLの読み込み/解析にmshtml.tlbを使用していますが、コードで要素をクリックできるように拡張したいと思います。問題は、例えばロードプロセスをトラップすることです。ボタンがクリックされました。私の特定のケースでは、ユーザーログインを実行したいと思います。
ここに私のコードがあります:
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-loop の代わりにもっと洗練された方法はありますか? 例えば。プログレスバーを使用していますか?