Использую следующий код для загрузки страницы:
- Код: Выделить всё
Dim objHTML As New HTMLDocument
Dim objDoc As New HTMLDocument
Set objDoc = objHTML.createDocumentFromUrl("http://www.google.com", vbNullString)
While objDoc.readyState <> "complete"
DoEvents
Wend
Text1.Text = objDoc.body.innerHTML
Проблема в том, что только первый раз страница действительно загружается, а далее берется из кеша, пока его не очищаешь.
Даже если поставить на конце URL знак вопроса (?), что приведет в браузере к обязательному обновлению, здесь не дает никакого результата.
Как этого можно избежать?