Сообщений в теме: 3512

[Shnapscapitan]

В All My Movies проблема разве что с альтернативным плагином для Кинопоиска. Штатные средства работают стабильно

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

[LesNik]

День добрый!

 

... Опять КП что-то химичат. Не придумали еще, как с этой бедой справиться?

Не уверен в 100%-ном результате, но мне помогает.
Закрываю окно капчи, в добавлении фильма - "отмена". Открываю КП в браузере, поиск любого фильма, если просит, прохожу капчу. В Мувинайзере по новой добавляю фильм. Капчу не просит.

[Shnapscapitan]

Не уверен в 100%-ном результате, но мне помогает.
Закрываю окно капчи, в добавлении фильма - "отмена". Открываю КП в браузере, поиск любого фильма, если просит, прохожу капчу. В Мувинайзере по новой добавляю фильм. Капчу не просит.

Ха, со сто первого раза сработало! Есть нюанс - когда я пытался этот фокус провернуть в ФФ с уже активированного аккаунта в Кинопоиске, ничего не выходило или, вернее, выходило после ста попыток (утрирую, но не сильно :о)) Плюнул, закрыл ФФ, открыл оперу, зашел на КП, не активируя аккаунт, и попробовал так - и тут же сработало. Вывод - когда мувинайзер посылает запрос на КП при активированном в браузере аккаунте, КП определяет это как автоматические запрос. А если акк не активирован, то не определяет. Собаки злые, короче :о)) Придется по браузерам скакать, чтобы кинишки в Мувинайзер добавлять

[LesNik]

Поправил загрузку рейтинга КП.

 kinopoisk_movie-7.zip   29.81К   85 Количество загрузок:

[aalex]

После ввода кода купленной мной лицензии, программа не работает.

Разработчик, этот редиска, окончательно заблокировал работу программы для РФ?

[aalex]

тема умерла?

[MaximT]

Всем привет. Может поможет кому. Пользую медианайзер и скрипт кинопоиска. Последние дни стало требовать пройти капчу Яндекса. Но капча какая то непроходимая. Вспомнил, что на кинопоиске когда то открывал аккаунт. Зашел в него. Прошел авторизацию от Яндекса. И скрипт заработал без всякой капчи. 

[aalex]

тема умерла?

????

[Anton Makarenko]

Добрый день. Да! Если бы нашлись умельцы и подправили скрипт по персонам, чтобы фильмография загружалась...

[x3malz]

Случайно? не осталось у кого версии medianizer 10.2 build 601?

[Fossman]

Случайно? не осталось у кого версии medianizer 10.2 build 601?

Есть версия 10.2 build 602, если надо.

http://web.archive.o.../movienizer.exe

[x3malz]

Есть версия 10.2 build 602, если надо.

http://web.archive.o.../movienizer.exe

Пойдет, спасибо огромное)))

[smartpix]

Поправил загрузку рейтинга КП.

kinopoisk_movie-7.zip

Огромное Спасибо за такую работу! Всё работает ! Единственный минус который заметил - это не правильное указания в карточки продолжительности фильма .! 

[tugodumchik]

Огромное Спасибо за такую работу! Всё работает ! Единственный минус который заметил - это не правильное указания в карточки продолжительности фильма .! 

Вы не подскажите какая версия у Вас программы, потому что у меня скрипт не работает. Спасибо

[x3malz]

Огромное Спасибо за такую работу! Всё работает ! Единственный минус который заметил - это не правильное указания в карточки продолжительности фильма .! 

Да, есть такое дело) Раньше время на сайте было только в минутах.

//movie duration (minutes)
duration:=0;
if (RegReadInteger('KinopoiskDlDuration', 1) = 1) then begin
s2 := ParseString(all, '<td class="time" id="runtime">(\d+) мин.', 1);
if s2 = '' then
s2:=ParseString(all, 'Время</b>.*?(\d+?) мин', 1);
if s2<>'' then
begin
try
duration:=StrToInt(s2);
except
end;
end
else
begin
s2 := ParseInfoContentText(all, 'Время');
s2 := Trim(ParseString(s2, '(\d+?) мин', 1));
if (not TryStrToInt(s2, duration)) then
duration := 0;
end;
if (duration = 0) then
begin
// s2 := ParseTag(all, '"duration":', ',');
s2 := ParseJsonParam(all, 'duration');
if (not TryStrToInt(s2, duration)) then
begin
s2 := ParseString(s2, 'M(\d+)S', 1);
if (not TryStrToInt(s2, duration)) then
duration := 0;
end;
end;
end;

Кто шарит подправьте код, чтобы цифру перед буквой "ч", умножал на 60 и складывал в общие минуты

Вы не подскажите какая версия у Вас программы, потому что у меня скрипт не работает. Спасибо

Вы закинули в правильное место?

C:\Users\Ваш пользователь\AppData\Roaming\Medianizer\Scripts

[Fossman]

C:\Users\Ваш пользователь\AppData\Roaming\Medianizer\Scripts

 

Это для инсталлированной версии. Для запускаемой как портабельная ( movienizer.exe /portable )- папка \Scripts находится в папке с программой.

Раньше время на сайте было только в минутах.

 

Скриншот покажите, с непраильным отображением времени

[x3malz]

Скриншот покажите, с непраильным отображением времени

Если посмотрите на каждом скрине видно, что last duration в коде кинопоиска, имеет правильный формат времени, может получится зацепить с последнего значения duration

Spoiler

 

 

[Fossman]

Попробуйте заменить строку (можно просто закомментировать вставив перед ней  //  )

s2 := ParseJsonParam(all, 'duration');

на строку

s2 := ParseJsonParam(all, 'timeRequired');;

и сообщите результат.

[x3malz]

Попробуйте заменить строку (можно просто закомментировать вставив перед ней  //  )
s2 := ParseJsonParam(all, 'duration');
на строку
s2 := ParseJsonParam(all, 'timeRequired');;
и сообщите результат.

Спасибо за подсказку)
Сработало лишь при удалении этого условия

		begin
			s2 := ParseInfoContentText(all, 'Время');
			s2 := Trim(ParseString(s2, '(\d+?) мин', 1));
			if (not TryStrToInt(s2, duration)) then
			duration := 0;
		end;

 
В итоге рабочий код

//movie duration (minutes)
	duration:=0;
	if (RegReadInteger('KinopoiskDlDuration', 1) = 1) then begin
		s2 := ParseString(all, '<td class="time" id="runtime">(\d+) мин.', 1);
		if s2 = '' then
		s2:=ParseString(all, 'время</b>.*?(\d+?) мин', 1);
		if s2<>'' then
		begin
			try
				duration:=StrToInt(s2);
				except
			end;
		end;
		if (duration = 0) then
		begin
			s2 := ParseJsonParam(all, 'timeRequired');
			if (not TryStrToInt(s2, duration)) then
			begin
				s2 := ParseString(s2, 'M(\d+)S', 1);
				if (not TryStrToInt(s2, duration)) then
				duration := 0;
			end;
		end;
	end;

[tugodumchik]

Да, есть такое дело) Раньше время на сайте было только в минутах.

//movie duration (minutes)
duration:=0;
if (RegReadInteger('KinopoiskDlDuration', 1) = 1) then begin
s2 := ParseString(all, '<td class="time" id="runtime">(\d+) мин.', 1);
if s2 = '' then
s2:=ParseString(all, 'Время</b>.*?(\d+?) мин', 1);
if s2<>'' then
begin
try
duration:=StrToInt(s2);
except
end;
end
else
begin
s2 := ParseInfoContentText(all, 'Время');
s2 := Trim(ParseString(s2, '(\d+?) мин', 1));
if (not TryStrToInt(s2, duration)) then
duration := 0;
end;
if (duration = 0) then
begin
// s2 := ParseTag(all, '"duration":', ',');
s2 := ParseJsonParam(all, 'duration');
if (not TryStrToInt(s2, duration)) then
begin
s2 := ParseString(s2, 'M(\d+)S', 1);
if (not TryStrToInt(s2, duration)) then
duration := 0;
end;
end;
end;

Кто шарит подправьте код, чтобы цифру перед буквой "ч", умножал на 60 и складывал в общие минуты

Вы закинули в правильное место?

C:\Users\Ваш пользователь\AppData\Roaming\Medianizer\Scripts

Да в эту папку и ничего не грузит, интересует какая версия программы должна быть, у меня 10.2