|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Замучил вопрос про загрузку
Совсем запутался с задачей.
Суть вот в чем: 1) Есть сайт на котором размещен различный контент для загрузки. 2) Имеется чужой исходник менеджера загрузки через indy. 3) На сайте стоит примитивный способ ограничения скачки этого самого контента (тобишь стоит таймер на 60 секунд перед началом скачивания того или иного файла). Почему примитивный - потому, что в исходном коде каждой странички, на одной и той же строке, есть ссылка на нужный файл, скопировав которую, можно скачать файл без 60 секунд ожидания. Теперь вопросы. Как научить менеджер загрузки, при заходе по адресу именно данного сайта, находить нужную строку, что скопировать url из неё в буфер обмена. И еще.... каким вообще способом известные всем менеджеры загрузки, перехватываю ссылку на скачивание из браузеров? Внедряя свои плагины в них или ставят хуки... как же??? Весьма озадачен данным вопросом, не могу спокойно уснуть уже которую ночь, размышляя как это воплотить. P.S. Никакой инфы по этому вопросу уже долго не могу найти... |
#2
|
||||
|
||||
Цитата:
Цитата:
|
#3
|
||||
|
||||
Цитата:
Что то не пойму, нужно все время скачивать каждый html файл? Ммм а насчет плагинов именно для перехвата ссылки, есть какая нибудь информация? |
#4
|
||||
|
||||
Цитата:
Цитата:
|
#5
|
||||
|
||||
Берешь Cygwin, там есть утилиты для работы с сетью, типа wget/curl, так же есть разнородные утилиты для работы с регулярками, пишешь шелл-скрипт, далее запускаешь и радуешься (с).
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#6
|
||||
|
||||
M.A.D.M.A.N. Спасибо попробую!
poli-smen а насчет парсинга, как парсить страницу если нужна только строчка с ссылкой на файл, и поместить её в edit. Просто я вообще понять не могу этот парсинг, примеры искал, все не то... или может плохо искал... Код HTML:
|
#7
|
||||
|
||||
ууууууу что то почитал и еще больше запутался
|
#8
|
||||
|
||||
Pos для "fileLink"
Пишу программы за еду. __________________ |
#9
|
||||
|
||||
нумлок - я понимаю дружище, но как реализовать не врубаюсь, смотрел несколько примеров в сети, пробовал переделывать для себя, на этом все.... ну не шарю я в этом парсинге, можешь направить меня на путь истинный?
|
#10
|
||||
|
||||
Цитата:
Код:
procedure TForm1.Button1Click(Sender: TObject); const cFindText: string = 'so.addVariable("fileLink", "'; var p1, p2: Integer; Html, Url: string; begin Html := Memo1.Lines.Text; Url := ''; p1 := Pos(cFindText, Html); if p1 > 0 then begin Inc(p1, Length(cFindText)); p2 := PosEx('"', Html, p1); if p2 > 0 then begin Url := Copy(Html, p1, p2 - p1); if not AnsiStartsText('http://', Url) then Url := ''; end; end; Edit1.Text := Url; if Url = '' then MessageDlg('Ссылка не найдена', mtError, [mbOK], 0); end; Также можно воспользоваться регулярными выражениями: |
Этот пользователь сказал Спасибо poli-smen за это полезное сообщение: | ||
alikoder (31.10.2012)
|
#11
|
||||
|
||||
спасибо добрый человек!
|