ник: Torny
Требуется несколько раз подряд открывать в этом компоненте разные страницы и анализировать их код. Думал, что получиться сделать все поточно в одной процедуре. Но не работает следующая конструкция:
WebBrowser.Navigate "<ссылка>"
Do Until WebBrowser.ReadyState = READYSTATE_COMPLETE
Loop
<анализ WebBrowser.Document.body.outerHTML>
Курсор выполнения просто не выходит из цикла ожидания загрузки. При этом после прерывания Ctrl+Break и запуска на продолжение переход на следующую после цикла команду выполняется.
Во время прерывания значение WebBrowser.ReadyState = READYSTATE_COMPLETE. А при "зависании" оно все время равно 1, т.е. READYSTATE_LOADING.
Как правильно сделать? (Access 2003)