Модераторы: MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Ссылки из фреймов Webbrowser, как получить ссылки из фрейма Webbrowser 
:(
    Опции темы
Visp
Дата 23.1.2007, 17:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Программер



Профиль
Группа: Участник
Сообщений: 19
Регистрация: 21.8.2006

Репутация: нет
Всего: нет



нужно вытянуть все ссылки из всех фреймов на странице которые указывают на определённый сайт например www.mysite.com
делаю так 
Код

  for f := 0 to WebBrowser1.OleObject.Document.Frames.Length - 1 do
          for i := 0 to WebBrowser1.OleObject.Document.Frames.Item(f).Document.links.Length - 1 do
try
            begin
              hr := WebBrowser1.OleObject.Document.Frames.Item(f).Document.Links.Item(i).href; //Exception тут
              if Pos('www.mysite.com', hr) > 0 then
                begin
                  ShowMessage(hr);
                end;
            end;
except
end;

но вылетает Exception
поставил try/except и вообще ничего  smile 
PM MAIL WWW ICQ   Вверх
_hunter
Дата 23.1.2007, 17:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 2
Всего: 98



такие:
WebBrowser1.OleObject.Document.Frames.Item(f).Document.Links.Item(i).href;
конструкции можно применять только если на 100% уверен что все объекты точно существуют.
проверь кого именно нету...


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Visp
Дата 23.1.2007, 17:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Программер



Профиль
Группа: Участник
Сообщений: 19
Регистрация: 21.8.2006

Репутация: нет
Всего: нет



Цитата(_hunter @  23.1.2007,  17:23 Найти цитируемый пост)
кого именно нету...


страница на которой тестирую - 2 фрейма оба со ссылками  smile 

может по другому как-то надо делать ?
PM MAIL WWW ICQ   Вверх
_hunter
Дата 23.1.2007, 17:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 2
Всего: 98



можно и по-другому (через COM) -- ищи на форуме ihtmldocument2


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
December
Дата 23.1.2007, 17:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 12
Всего: 57



Какой именно exception? от этого всё зависит


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: ActiveX/СОМ/CORBA"

Rrader
Girder

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Delphi
  • Вопросы по SQL и вопросы по базам данных, не связанные с Delphi, задавать здесь

Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема »


 




[ Время генерации скрипта: 0.0751 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.