-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Пытаюсь вытащить информацию с http

Среда, 09 Июля 2014 г. 17:42 + в цитатник
Добрый день.
Пытаюсь вытащить информацию с http
Пишу:
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate "http…"
While IE.ReadyState < 4
DoEvents
Wend
Set mDoc = IE.Document
For i1 = 1 To mDoc.all.tags("span").Length  
a = mDoc.all.tags("span").Item(i1 - 1).ID 
Здесь циклом по span ищу нужный мне id 
Next i1

Удивительное дело. В теле mDoc тэгов span около 50. А mDoc.all.tags("span").Length показывает всего 24. Естественно нужный мне тэг расположен дальше чем 24-й по счету и цикл до него не доходит. Принудительно пишу условие окончания цикла больше чем 24. Доходит до 24, дальше ругается, мол нет больше span в документе. Голову сломал что это может быть. Главное раньше все работало.
ХР, Акс 2003. Хром

Может у кого есть идеи куда копать?

http://www.sql.ru/forum/1104402/pytaus-vytashhit-informaciu-s-http


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку