VPF::копирование ссылок в выдаче google

MrBanochka

Дата 9.1.2012, 20:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

Всем привет. Пишу парсер выдачи Гоши и столкнулся с некой проблемой. Мне нужно получить ссылки на сайт с найденной странице, т.е. отправляю запрос:

Код


http://www.google.com/search?q=+edit1.text

И получаю html код страницы

Код


Source:= IdHTTP1.Get('http://www.google.com/search?q='+edit1.text);

Затем нахожу все ссылки со страницы следующим кодом

Код


while Pos('href="', Source) <> 0 do begin
      Delete(Source, 1, Pos('href="', Source) + Length('href="') - 1);
      ListBox1.Items.Add(Copy(Source, 1, Pos('"', Source) - 1));
      Application.ProcessMessages;
    end;

Вся эта шайтан-машина работает, но ссылки получаю в виде редиректа, а хотелось бы, чтобы были именно прямые ссылки. smile

Видел в некоторых прогах такое исполнение, но исходников не нашел smile

Akella

Дата 11.1.2012, 12:26 (ссылка)

(голосов:1)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

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

Идёшь по редиректу и получаешь ссылку smile

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