Количество рецензий(комментариев) с Кинопоиска

Впечатления о программе, вопросы, замечания.
Post Reply
denlog
Passerby
Posts: 2
Joined: Sun Jan 15, 2017 8:32 pm

Количество рецензий(комментариев) с Кинопоиска

Post by denlog » Sun Jan 15, 2017 8:42 pm

Здравствуйте уважаемые разработчики!
После приобретения программы я углубился в наполнение коллекции фильмов, и как любитель почитать рецензии на Кинопоиске, был сначала очень обрадован возможности видеть их в вашей программе, но радость длилась не долго, ведь комментарий(рецензию) программа подтягивает только одну, и не понятно по какому алгоритму. Если бы в настройках была возможность выбора количества загружаемых рецензий(к примеру одна или все), то программа Movienizer заменила бы сайт Кинопоиск (конкретно для меня) на этапе предварительной оценки фильма.
Спасибо, с уважением.

TerribleFloater
Superstar
Posts: 1925
Joined: Thu Feb 28, 2008 4:20 pm

Re: Количество рецензий(комментариев) с Кинопоиска

Post by TerribleFloater » Mon Jan 16, 2017 7:24 pm

denlog wrote:ведь комментарий(рецензию) программа подтягивает только одну
Программа вообще не подтягивает комментариев или рецензий, с чего Вы это взяли? Описание (синопсис) — это вовсе не рецензия.
Хочу: чёрные списки, пол людей, пользовательские поля изданий.
Кинопоиск: Image ПлюсКинопоиск: Image

User avatar
ilychuk
Star
Posts: 396
Joined: Mon Oct 22, 2012 1:58 pm
Location: Minsk, Belarus
Contact:

Re: Количество рецензий(комментариев) с Кинопоиска

Post by ilychuk » Tue Jan 17, 2017 11:10 am

TerribleFloater wrote:
denlog wrote:ведь комментарий(рецензию) программа подтягивает только одну
Программа вообще не подтягивает комментариев или рецензий, с чего Вы это взяли? Описание (синопсис) — это вовсе не рецензия.
Версия 8.2 подгружает и размещает во вкладке карточки "Комментарий"

TerribleFloater
Superstar
Posts: 1925
Joined: Thu Feb 28, 2008 4:20 pm

Re: Количество рецензий(комментариев) с Кинопоиска

Post by TerribleFloater » Tue Jan 17, 2017 7:36 pm

ilychuk wrote:
TerribleFloater wrote:
denlog wrote:ведь комментарий(рецензию) программа подтягивает только одну
Программа вообще не подтягивает комментариев или рецензий, с чего Вы это взяли? Описание (синопсис) — это вовсе не рецензия.
Версия 8.2 подгружает и размещает во вкладке карточки "Комментарий"
Мда, век живи — век учись. Прошу прощения у denlog. В порядке компенсации предлагаю следующее: перед строчкой 1349 скрипта kinopoisk_movie.pas (это для версии 245):

Code: Select all

          comments:=DecodeHTML(comments);
добавить строчку:

Code: Select all

		  comments := comments + '<br>' + GetStr(all, '<ul class="resp_type">', '</ul>');
Тогда после скачанной рецензии будет выведено количество рецензий:
Все:90 Положительные:75 Отрицательные:5 Процент:88.9% Нейтральные:10
Если хочется, чтобы эта строка было до рецензии, тогда надо её написать наоборот:

Code: Select all

		  comments := GetStr(all, '<ul class="resp_type">', '</ul>') + '<br>' +  comments;
Хочу: чёрные списки, пол людей, пользовательские поля изданий.
Кинопоиск: Image ПлюсКинопоиск: Image

denlog
Passerby
Posts: 2
Joined: Sun Jan 15, 2017 8:32 pm

Re: Количество рецензий(комментариев) с Кинопоиска

Post by denlog » Wed Jan 18, 2017 3:49 pm

TerribleFloater
Спасибо большое!

TerribleFloater
Superstar
Posts: 1925
Joined: Thu Feb 28, 2008 4:20 pm

Re: Количество рецензий(комментариев) с Кинопоиска

Post by TerribleFloater » Wed Jan 18, 2017 4:51 pm

denlog
"Рад был помочь!" (с)
Но у себя я загрузку комментариев отключил: это поле в карточке фильме — единственное место, где я мог записывать что-то своё, не боясь, что очередная загрузка это самое "моё" сотрёт ко всем чертям.
Хочу: чёрные списки, пол людей, пользовательские поля изданий.
Кинопоиск: Image ПлюсКинопоиск: Image

Post Reply