Ошибка веб-браузера VB6 не может получить свойство outerhtml

У меня есть старая программа, созданная им VB6, и она работала хорошо, Я использую элемент управления веб-браузера для загрузки веб-страницы, а затем получить html внутри строки, недавно я получил следующее сообщение об ошибке, когда я попытался загрузить HTML-код в строковую переменную, это происходит только с большими страницами.Ошибка веб-браузера VB6 не может получить свойство outerhtml

enter image description here

Мой код ниже

Dim html As String 
Private Sub GetHtm_Click() 
    WebBrowser1.Navigate (webVar) 
    Do 
     DoEvents 
    Loop Until Not WebBrowser1.Busy 
    html = WebBrowser1.Document.documentElement.outerHTML 
End Sub

источник

2013-11-18 Peter Elias

Вам нужно поместить свой html = внешний HTML в событие WebBrowser1_DocumentComplete. –

WebBrowser1.Document.documentElement.outerHTML работает только в DocumentComplete События.

Private Sub WebBrowser1_DocumentComplete() 

    html = WebBrowser1.Document.documentElement.outerHTML 

End Sub

источник

2013-11-20 08:30:44 FrozenFire

Я использовал этот метод (мой код выше) для нескольких проектов, и он работал правильно, но появился только тогда, когда я открыл большую страницу html внутри веб-браузера, это может быть проблема с памятью? –

Ошибка веб-браузера VB6 не может получить свойство outerhtml

ответ

Смежные вопросы