VB6 WebBrowser 오류는 OuterHTML 속성을 얻을 수 없습니다
문제
나는 오래된 프로그램이 VB6에 의해 만들어졌고, 그것은 잘 작동하고 있었다, 웹 브라우저 컨트롤을 사용하여 웹 페이지를로드 한 다음 문자열 안의 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