Как присвоить на прямую WebBrowser-у, html-body контрола? - VB

Узнай цену своей работы

Формулировка задачи:

Есть контрол WinHTTP, Отправляется запрос на страницу WinHTTP.Open 'GET', 'http://www....', False WinHTTP.Send После возврата WinHTTP.ResponseBody сначала загоняю в файл а затем его WebBrowser1.Navigate2 на WebBrowser1 который находится на форме. Вопрос: Каким способом можно присвоить WebBrowser-у ответ WinHTTP.ResponseBody сразу без сохранения в файл. Заранее премного благодарен. И еще, может кто подскажет, как найти ТЭГ коментариев (<!-- -->), в коде, используя HTML Object Library. Другие тэги ищутся по типу:
Листинг программы
  1. WebBrowser1.Document.All.Tags('TABLE')
  2. WebBrowser1.Document.All.Tags('A')
а вот код
Листинг программы
  1. WebBrowser1.Document.All.Tags('<')
  2. WebBrowser1.Document.All.Tags('<!')
  3. WebBrowser1.Document.All.Tags('<!--')
не проходит %-[

Решение задачи: «Как присвоить на прямую WebBrowser-у, html-body контрола?»

textual
Листинг программы
  1. Private Sub Form_Load()
  2.     WebBrowser1.Navigate 'C:aaa.htm'
  3. End Sub
  4. '
  5. Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
  6.     Dim myHTMLdoc As Object
  7.     Set myHTMLdoc = WebBrowser1.Document
  8.     myHTMLdoc.body.innerHTML = 'Some text'
  9. End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 3.571 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы