Как присвоить на прямую WebBrowser-у, html-body контрола? - VB
Формулировка задачи:
Есть контрол WinHTTP, Отправляется запрос на страницу WinHTTP.Open 'GET', 'http://www....', False
WinHTTP.Send
После возврата WinHTTP.ResponseBody сначала загоняю в файл а затем его WebBrowser1.Navigate2 на WebBrowser1 который находится на форме.
Вопрос:
Каким способом можно присвоить WebBrowser-у ответ WinHTTP.ResponseBody сразу без сохранения в файл.
Заранее премного благодарен.
И еще, может кто подскажет, как найти ТЭГ коментариев (<!-- -->), в коде, используя HTML Object Library.
Другие тэги ищутся по типу:
а вот код
не проходит %-[
Листинг программы
- WebBrowser1.Document.All.Tags('TABLE')
- WebBrowser1.Document.All.Tags('A')
Листинг программы
- WebBrowser1.Document.All.Tags('<')
- WebBrowser1.Document.All.Tags('<!')
- WebBrowser1.Document.All.Tags('<!--')
Решение задачи: «Как присвоить на прямую WebBrowser-у, html-body контрола?»
textual
Листинг программы
- Private Sub Form_Load()
- WebBrowser1.Navigate 'C:aaa.htm'
- End Sub
- '
- Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
- Dim myHTMLdoc As Object
- Set myHTMLdoc = WebBrowser1.Document
- myHTMLdoc.body.innerHTML = 'Some text'
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д