Неофициальный форум DLNA Home Media Server — Автозагрузка нескольких страниц с сайта

Re: Автозагрузка нескольких страниц с сайта

null@example.com (WendyH) — Sat, 22 Aug 2015 19:41:30 +0000

Ну, можно проверку вставить, чтобы он страницы дозагружал только у категорий или там, где это необходимо. Например, это можно определить по содержимому ссылки:

  if (Pos('film_selector.php', sPage)>0) OR (Pos('category.php', sPage)>0) then
    for iFlags := 1 to 5 do
    sWebPage := sWebPage+HmsSendRequestEx('torrent-tv.ru', sPage+'&page='+IntToStr(iFlags), 'GET', 'application/x-www-form-urlencoded', sHeaders, '', 80, iFlags, sAnswerHeaders, true);

Или типа того.

Leshiy71 пишет:

А если есть желание продолжить мастер-класс преподования на примере этого подкаста, то интересует следующее :
Поскольку здесь фильмы и сериалы вперемешку, как сделать чтобы для сериалов автоматом создавались папки с названиями сериалов, а в них уже ссылки на все серии.
Так же, при выборе ссылки с фильмом автоматом запускается самая первая ссылка на сайте. Как сделать чтобы был выбор нескольких ссылок на фильм, с указанием в названии качества видео и колличества раздающих на трекере.
PS Если вы всё это распишите, то получится что весь подкаст переделали и создали заново.

Если я всё это распишу и это сделаете вы, то это будет не то же самое, что если бы я это сделал сам. Как раз мне намного интересней, когда люди сами делают. И вообще, этот форум для этого и задумывался, для совместного творчества.

Распишу, как будет время. Может быть завтра.

Re: Автозагрузка нескольких страниц с сайта

null@example.com (Leshiy71) — Fri, 21 Aug 2015 19:56:52 +0000

Спасибо, 2 вариант получилось вставить только с 10 попытки, то и дело строчки местами менялись почему то, может оставались не нужные пробелы. Сначала создавались по 84 фильма т.е. 4 страницы, как я понял что не загружалась 1 страница, когда вместо for iFlags := 2 to 5 do вставил for iFlags := 1 to 5 do то стало 105 фильмов.
Только один косяк получился в подкасте - каналы по разделам обновляются, а HD раздел каналов перестал обновлять подкаст.

Вообще то хотел ещё пару вопросов, но если вам не приятно ковыряться в чужом подкасте, то лучше потом статью напишите на примере своих подкастов. А если есть желание продолжить мастер-класс преподования на примере этого подкаста, то интересует следующее :
Поскольку здесь фильмы и сериалы вперемешку, как сделать чтобы для сериалов автоматом создавались папки с названиями сериалов, а в них уже ссылки на все серии.
Так же, при выборе ссылки с фильмом автоматом запускается самая первая ссылка на сайте. Как сделать чтобы был выбор нескольких ссылок на фильм, с указанием в названии качества видео и колличества раздающих на трекере.

PS Если вы всё это распишите, то получится что весь подкаст переделали и создали заново.

Re: Автозагрузка нескольких страниц с сайта

null@example.com (WendyH) — Fri, 21 Aug 2015 18:22:16 +0000

Ну или чуток покрасивей - цикл:

  for iFlags := 2 to 5 do
    sWebPage := sWebPage+HmsSendRequestEx('torrent-tv.ru', sPage+'&page='+IntToStr(iFlags), 'GET', 'application/x-www-form-urlencoded', sHeaders, '', 80, iFlags, sAnswerHeaders, true);

Вместо 5 можете свою цифру поставить.

Re: Автозагрузка нескольких страниц с сайта

null@example.com (WendyH) — Fri, 21 Aug 2015 18:18:41 +0000

Leshiy71 пишет:

На сайте ТоррентТВ есть раздел с кинофильмам. Когда вручную добавил папку фильмы, с адресом с сайта, то обновляется только одна страница с сайта. Если там не сложно, и не надо переписывать весь подкаст, может подскажите решение, чтобы обновлялись все или несколько страниц в разделах папки фильмы.

Самое простое, хардкорно, в скрипте по Alt-2, после строки:

  sWebPage := HmsSendRequestEx('torrent-tv.ru', sPage, 'GET', 'application/x-www-form-urlencoded', sHeaders, '', 80, iFlags, sAnswerHeaders, true);

добавьте:

  sWebPage := sWebPage+HmsSendRequestEx('torrent-tv.ru', sPage+'&page=2', 'GET', 'application/x-www-form-urlencoded', sHeaders, '', 80, iFlags, sAnswerHeaders, true);
  sWebPage := sWebPage+HmsSendRequestEx('torrent-tv.ru', sPage+'&page=3', 'GET', 'application/x-www-form-urlencoded', sHeaders, '', 80, iFlags, sAnswerHeaders, true);
  sWebPage := sWebPage+HmsSendRequestEx('torrent-tv.ru', sPage+'&page=4', 'GET', 'application/x-www-form-urlencoded', sHeaders, '', 80, iFlags, sAnswerHeaders, true);
  sWebPage := sWebPage+HmsSendRequestEx('torrent-tv.ru', sPage+'&page=5', 'GET', 'application/x-www-form-urlencoded', sHeaders, '', 80, iFlags, sAnswerHeaders, true);

Итого будет загружено 5 страниц, это создаст 105 ссылок на видео.

Re: Автозагрузка нескольких страниц с сайта

null@example.com (Leshiy71) — Thu, 20 Aug 2015 17:50:55 +0000

На сайте ТоррентТВ есть раздел с кинофильмам. Когда вручную добавил папку фильмы, с адресом с сайта, то обновляется только одна страница с сайта. Если там не сложно, и не надо переписывать весь подкаст, может подскажите решение, чтобы обновлялись все или несколько страниц в разделах папки фильмы.

Re: Автозагрузка нескольких страниц с сайта

null@example.com (WendyH) — Thu, 20 Aug 2015 17:22:50 +0000

Не понял, а поподробнее. Что за "Автозагрузка нескольких страниц с сайта"? Каких?

Автозагрузка нескольких страниц с сайта

null@example.com (Leshiy71) — Thu, 20 Aug 2015 16:48:46 +0000

Интересует для подкаста ТоррентТВ (избр+фильмы) для папки фильмы (добавлена вручную).