Page 9 of 34
Posted: 2018-01-14 14:32:42
by lucas7911
A czy ktoś może podesłać poprawiony skrypt dla Filmweb, bo poprawka ze zmienianiem linijek to dla mnie czarna magia, lub wrzucić na jakiś hosting
proszę o przesłanie na
szleklucas@gmail.com
Posted: 2018-01-14 14:58:19
by antp
Or just send me the updates via e-mail so I publish them on the server, like what is done for all other scripts, allowing automatic updates via the "update scripts" script
Posted: 2018-01-14 16:39:52
by athe
Wysłałem poprawiony skrypt do administratora. Ta wersja jest wersją 3.0.1c (01.03.2017), napisaną przez Ariell'a, z kilkoma poprawkami zrobionymi przeze mnie, po ostatniej niespodziance filmweb-u. Pozdrawiam
Posted: 2018-01-14 17:40:35
by antp
Thanks, I uploaded it to the server (
http://update.antp.be/amc/scripts/ ) and updated the version number to 3.0.2 as well as the date.
Posted: 2018-01-14 20:56:42
by lucas7911
Błąd skryptu "MAIN" : string error w linii 43
Taki komunikat po próbie uruchomienia poprawionego skryptu filmweb
Posted: 2018-01-14 21:03:28
by athe
lucas7911 wrote:Błąd skryptu "MAIN" : string error w linii 43
Taki komunikat po próbie uruchomienia poprawionego skryptu filmweb
Możesz przekopiować tutaj tą linię? U mnie przy linii 43 nie ma żadnego błędu. Rozumiem, że masz wersję programu minimum 4.
Posted: 2018-01-14 21:05:56
by lucas7911
MovieTitle := TextBetween(Line, 'class="filmPreview__title">', '</h3>);
Posted: 2018-01-14 21:08:36
by lucas7911
Posted: 2018-01-14 21:25:26
by lucas7911
Wersja programu najnowsza
Posted: 2018-01-14 21:32:11
by athe
U mnie nie wywala tego błędu, gdy wyszukiwałem Twój film. Tak jest przy każdym filmie?
Posted: 2018-01-14 21:41:34
by lucas7911
Przy każdym filmie dodatkowo , tak samo się dzieje gdy próbuje uruchomić skrypt z menu narzędzia bez wpisanego tytułu, a możesz mi podesłać twój plik skryptu na adres podany wyżej
Posted: 2018-01-14 21:52:56
by athe
Wysłałem. Czy ktoś jeszcze ma ten błąd?
Posted: 2018-01-14 22:31:16
by lucas7911
Zainstalowałem na innym komputerze, instalacja wersji 4.2.1, aktualizacja skryptu do poprawionego z datą 14.01.2018 i przy wyszukaniu filmu taki sam błąd co podałem, wypróbowałem tez wersję portable i ta sama sytuacja
Posted: 2018-01-14 23:00:43
by lucas7911
Ok już po problemie. otworzyłem oryginalny poprawiony skrypt Filmweb z 14.01.2018 i linię nr 43 zastąpiłem znalezioną linijką ze skryptu przedstawionego stronę wcześniej z sekcji "procedure GetMovieTitles(Address : String);" , potem jeszcze wyskoczył jeden błąd z linią 126 i też zastąpiłem linijką z podanego wcześniej z sekcji "procedure AnalyzeSearchPage(Address : String; MovieType : String);", po tym jeszcze woła o import pliku z dodatkowymi polami ale działa i wyszukuje już bez problemu
Posted: 2018-01-15 06:57:02
by athe
Problem był w literówce, zabrakło znaku zamykającego ' przed ostatnim nawiasem. Było:
Code: Select all
MovieTitle := TextBetween(Line, 'class="filmPreview__title">', '</h3>);
powinno być:
Code: Select all
MovieTitle := TextBetween(Line, 'class="filmPreview__title">', '</h3>');
To samo z drugą linią, w której wywalało u Ciebie błąd. Ten błąd wynikł z tego, że mam skrypt dostosowany do moich potrzeb a na serwer musiałem wysłać oficjalny i przy kopiowaniu zmienionych linii ominąłem ten znak. Poprawiłem to i jeszcze raz wyślę do administratora.
P.S. Te poprawki zrobiłem doraźnie, dopóki Ariell się nie odezwie. Obiecał zmiany, chodzi o zwiastuny, i na nie czekamy.
Posted: 2018-01-15 17:40:42
by antp
Update published as version 3.0.2a
znowu zmiany na filmweb
Posted: 2018-01-15 19:01:50
by athe
Nie mam pojęcia co wyprawiają na filmweb. Znowu wprowadzają jakieś zmiany. Nie wiem, przeczekać to i wtedy zrobić poprawki, czy jak. W niektórych tytułach filmów strony mają inne struktury niż pozostałe. Może są w trakcie dokonywania zmian?
Posted: 2018-01-16 10:08:32
by lucas7911
U mnie wyszukuje i pokazuje że znaleziono np. filmów 9 i seriali 3 bez listy tytułów - utrudniają na całego
Posted: 2018-01-16 15:33:56
by robinse
U mnie ten sam problem
Posted: 2018-01-16 17:48:49
by athe
koledzy, doraźnie poprawcie jedną linijkę w procedurze
Code: Select all
procedure GetMovieTitles(Address : String);
Chodzi dokładnie o linijkę
Code: Select all
Page.Text := TextBetween(Page.Text, 'id="searchResult" >', 'class="content__sidebar">');
ma być:
Code: Select all
Page.Text := TextBetween(Page.Text, 'id="searchResult"', 'class="content__sidebar">');
Cały czas coś zmieniają.