![]() |
Модераторы: Snowy, Poseidon, MetalFan |
![]() ![]() ![]() |
|
ATF |
|
|||
Новичок Профиль Группа: Участник Сообщений: 3 Регистрация: 26.1.2009 Репутация: нет Всего: нет |
Ссылка на проблемную страницу ниже. На неё захожу при помощи TWebBrowser'а двумя переходами
с другого сайта. Нужно сграбить строку после слов "Оценка компании". Трабл в том, что страница формируется после загрузки ява-скриптом. Сохранение содержимого в файл не помогает, так как html код содержит только те самые скрипты, которые и тянут данные на страничку. Если знаете, как добраться до данных, помогите плиз ![]() http://spark.interfax.ru/CompanyInformatio...ache=2140411910 |
|||
|
||||
MetalFan |
|
|||
![]() Аццкий Сотона ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 3815 Регистрация: 2.10.2006 Где: Moscow Репутация: 14 Всего: 128 |
так пробегись по структуре документа после загрузки... см. HTMLDOM
-------------------- There are always someone smarter than you... |
|||
|
||||
ATF |
|
|||
Новичок Профиль Группа: Участник Сообщений: 3 Регистрация: 26.1.2009 Репутация: нет Всего: нет |
воспользовался вот этим...
tr: IHTMLTxtRange; .... tr := ((WebBrowser1.Document as IHTMLDocument2).body as IHTMLBodyElement).createTextRange; tr.text из текста легко вынимается нужная строка. Есть ещё трабл... не могу правильно выделить момент времени, когда нужно обращаться к WebBrowser за данными. Грабли чешут страницы в цикле. WebBrowser'у передается url в метод Navigate. Пробывал ждать окончания загрузки данных следующими вариантами: 1. ждать в вайле, пока WebBrowser.Busy: while WebBrowser.Busy do Application.ProcessMessages 2. вызывать родной метод WebBrowser: WaitWileBusy() Ни первое, ни второе не спасают от смешивания данных. Грабли идут по ссылке номер N, а из WebBrowser'а вынимается текст, относящийся к одной из предшествующих ссылок. И ещё одна новость... иногда само открывается окно IE, а после его закрытия вручную возникает окно с вопросом "Просматриваемая web-страница пытается закрыть окно. Закрыть окно?"... Если нажать "Да", то WebBrowser пропадает с формы + Exception. "Нет" приводит к слету и остановке граблей. Трудность в том, что Delphi на одном ПК, а Интернет на другом - отлаживиться тяжко :( Это сообщение отредактировал(а) ATF - 14.2.2009, 23:45 |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Сети" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делится вскрытыми компонентами
Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Сети | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |