Доброго времени суток.
Начал осваивать тему получения данных с сайтов. В качестве первой задачи решил взять следующую:
Есть корпоративный сайт / сервис. На нем кнопка "Получить данные". Нажатие которой и некоторое ожидание выдает таблицу.
Данные этой таблицы хочу забирать в Excel.
Нашел пример. Пробую работать.
Так вот. После вот этой строчки
Открывается Explorer c сайтом. Но при этом объект IE теряет все свойства. Попытки обращения к .Busy или .Document выдают ошибки.
Как правило: "Выбранный объект был отключен от клиентов".
Подскажите, что я делаю не так, в чем может быть причина.
Office 2013. Explorer 11
UPD Прикладываю фрагмент кода
Строка 16 всегда ошибка
Начал осваивать тему получения данных с сайтов. В качестве первой задачи решил взять следующую:
Есть корпоративный сайт / сервис. На нем кнопка "Получить данные". Нажатие которой и некоторое ожидание выдает таблицу.
Данные этой таблицы хочу забирать в Excel.
Нашел пример. Пробую работать.
Так вот. После вот этой строчки
| Цитата |
|---|
| IE.Navigate " |
Как правило: "Выбранный объект был отключен от клиентов".
Подскажите, что я делаю не так, в чем может быть причина.
Office 2013. Explorer 11
UPD Прикладываю фрагмент кода
| Код |
|---|
Dim i As Long
Dim IE As Object
Dim objElement As Object
Dim objCollection As Object
Set IE = CreateObject("InternetExplorer.Application")
' Send the form data To URL As POST binary request
IE.Navigate "http://xx.xx.xx.xxx/ssssss/"
' Wait while IE loading...
Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
Set objCollection = IE.document.getElementsByTagName("input")
i = 0
While i < objCollection.Length
|
Изменено: - 15.10.2015 07:17:24
