Нужна помощь! Обработка HTML страниц средствами VBA

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

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

Помогите решить такую задачу:
работаю в Access XP
нужно вытянуть данные некой таблицы на интернет странице, при помощи VBA,
и сохранить данные этой таблицы в базе данных.
Задача состоит в том, что эта страница содержит помимо нужной таблицы еще много ненужной информации. Как программно выкинуть ее?
Сейчас в Access запихиваю через Excel (Обьект QueryTables), очень долго...
Очень буду признателен за ответ на e-mail: removed@mail.ru

Решение задачи: «Нужна помощь! Обработка HTML страниц средствами VBA»

textual
Листинг программы
<font color="blue">Dim</font> IE <font color="blue">as</font> <font color="blue">Object</font>
<font color="blue">Dim</font> doc <font color="blue">as</font> HTMLDocument
<font color="blue">Dim</font> row <font color="blue">as</font> <font color="blue">Object</font>
<font color="blue">Dim</font> cell <font color="blue">as</font> <font color="blue">Object</font>
<font color="blue">Set</font> IE = CreateObject(<font color="teal">"InternetExplorer.Application"</font>)
IE.Visible = True
IE.Navigate <font color="teal">"url"</font>
<font color="blue">While</font> IE.ReadyState <> <font color="darkblue"><b>4</b></font>
    DoEvents
<font color="blue">Wend</font>
<font color="blue">Set</font> doc=IE.document

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


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

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

10   голосов , оценка 4.1 из 5
Похожие ответы