VB6网页浏览器错误无法获取outerhtml属性
题
我拥有旧程序是由VB6创建的,它运行良好,我正在使用Web浏览器控件加载网页,然后将HTML放入字符串中,最近我在尝试将HTML代码加载到一个时收到了以下错误消息字符串变量,仅在大页面上发生。
我的代码如下
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
解决方案
WebBrowser1.Document.documentElement.outerHTML
只适用于 DocumentComplete
活动。
Private Sub WebBrowser1_DocumentComplete()
html = WebBrowser1.Document.documentElement.outerHTML
End Sub
不隶属于 StackOverflow