Led
7
kecinzer | Ne, 7. Leden 2007, 10:53
Dobrá zpráva, pro všechny, kteří použivají skvělý program Ant Movie Catalog, o kterém jsem již dříve psal. Konečně se mi podařilo upravit script na stahování informací o filmech z Československé filmové databáze dle mých představ. Hodně mi pomohl MI'RA, kterého jsem hodně otravoval a tímto mu děkuji.
Sesmolit těch pář řádků byl pro mě strašlivý úkol, jelikož se v Delphi absolutně nevyznám. Takže úpravy, které jsem provedl jsou možná zběsilé a uričtě by šly udělat lépe.
Co se změnilo:
- Jednak byla opravena chyba, která házela do URL filmu další tuny znaků navíc.
- Dále bylo vylepšeno stahování popisku filmu, který je nyní stahován celý.
- A nakonec jsem si nechal možnost hledat ve všech typech názvů najednou (dříve se musela vybrat možnost z oreginálních, českých nebo slovenských názvů) + teď to hledá ještě v anglických názvech.
Za nejnovější verzi děkuji uživateli IkE Blaster!
| Příloha | Velikost |
|---|---|
| csfd.cz.zip | 4.98 KB |
- Přidat komentář
- 12995x přečteno
Zase tak moc neotravoval - je to kluk sikovna :-)
Ahoj,
skript je super, nedalo by se jeste udelat, aby nacital i komentare z CSFD? Moc by mi to pomohlo. Diky Honza
Udělat by to určitě šlo, bohužel teď nemám nějak čas. Až bude, tak se na to mrknu.
Je to super, mám tento program sice jen druhý den, ale až na pár maličkostí je bezva. Tvůj script si cením - jen se chci zeptat, jestli ten středník, co zůstává při stažení původního názvu na konci, jde zrušit nějak aoutomaticky, ne ručním smazáním.
Díky
Předem musím říct, že tento script není jen můj, ale na jeho vývoji se podílelo více lidí.
Středník se na konci objevuje pouze někdy, a to tehdy, pokud má film více názvů. Teď jsem to zkoušel - přidával jsem film Frequency a žádný středník se mi neobjevil.
Možná také záleží na nastavení scriptu.
nenacitaji se mi obrazky s csfd :( ale fungovalo to ale ted uz ne :(
takze je potreba provest upravu pro nacitani obrazku z www.csfd.cz a to nasledovne:
// picture
LineNr := FindLine('table background="posters', Page, 0);
if (LineNr > -1) then
begin
Line := Page.GetString(LineNr);
BeginPos := pos('table background="posters', Line) + 18;
if (BeginPos > 10) then
begin
EndPos := pos('" border="', Line);
Value := copy(Line, BeginPos, EndPos - BeginPos);
Value := BaseAddress + Value;
GetPicture(Value);
end;
end;
Doufam ze to je funkcni...(me to jede)
ENJOY *129* byMoStYr
Teď jsem se teprv dostal k zadávání nových filmů. Funguje to parádně. Díky.
Zase se mi přestaly stahovat obrázky, i když mám stáhnutý script tady odsuď. Do včerejška to šlapalo parádně, dnes nejdou stáhnout obrázky. Prosím, mrkněte se na to. Děkuji předem a mnohokrát.
Včera večer jsem na server teprve nahrál upravenou verzi scriptu.
Opet zmena na www.csfd.cz Upravit kod scriptu takhle:
// picture
LineNr := FindLine('table background="http://img', Page, 0);
if (LineNr > -1) then
begin
Line := Page.GetString(LineNr);
BeginPos := pos('table background="http://img', Line) + 18;
if (BeginPos > 10) then
begin
EndPos := pos('" border="', Line);
Value := copy(Line, BeginPos, EndPos - BeginPos);
Value := Value;
GetPicture(Value);
end;
end;
Tak snad to poslape zas nejakou dobu... Tady je link na stazeni cele upravene verze scriptu
ENJOY *129* byMoStYr
Nevím,kde je chyba, ale obrázky se mi stále nenačítají. I když jsem stáhnul ten nový script.Asi je to rukama, ale fakt už nevím.
Ano, všimnul jsem si toho již v pátek. Díky za úpravu, hned jí hodím do ZIPu v článku.
Takze zde mame dalsi zmenu scriptu...
je potreba nahradit v scriptu retezec "search.php?" retezcem "search_pg.php?"
Nahrazeni by melo probehnout na 2 pozicich viz.
// zadani z inputu
if Input('Import movie from www.csfd.cz', 'Enter the title of the movie:', MovieName) then
begin
// analyzuj stranku http://www.csfd.cz/search_pg.php?search=jmeno_filmu
AnalyzePage(BaseAddress + 'search_pg.php?search=' + UrlEncode(MovieName));
end;
ENJOY *129* byMoStYr
Díky, opět rychlík, ani jsem si tohoto komentáře nevšimnul :).
Hned sem jdu nahrát novou verzi.
Super :o:)))
Díky :o))) ted to funguje!
Mohl by ale nekdo zkusit zadat novy film Pupendo a stahnout k nemu informace z CSFD.
At delam co delam, me se to nedari! napise mi to:
No movie found for this search.
Nebyly nalezeny zadne zaznamy.
Pritom ten film tam je: Pupendo
Co delam spatne? Poradi mi nekdo?
Asi uz je to malicko s krizkem po funuse, ale presto - protoze se me na to ptalo uz vic lidi :
Ten strednik za nazvem se nechava, pokud ma skript nastaveno, aby se novy nazev pripojoval za stary (mozna naopak ;) - strednik je pak oddeluje. Takze komu to tam vadi, at si nastavi parametry typu "addCZname" na 0.
http://forum.antp.be/phpbb2/viewtopic.php?p=19267#19267 - podle me by vas to mohlo zajimat ;-). Plus nekolik reakci v te diskuzi zpet.
Kdyby mel nekdo zajem o skript pro fdb.cz, tak stahujte tady. Lepil jsem to jak se dalo, tak mě za ten zdrojak nekamenujte. Ale snad vám to pojede. Kdyžtak napište připomínky a pokusím se vyhovět když bude čas.
Lrrr
Funguje dnes někomu skript? Me to nenabídne seznam filmů. Nevíte kde je chyba? Diky za odpovědi
Zkoušel jsem a funguje bez problémů.
Mám verzi 1.8 která delší dobu fungovala bez problémů, teď to nějak nefunguje, nenabídne se okno se seznamem vyhledaných filmů, u jiných skriptů (dvdexpress, fdb) vše funguje jak má. Nevíte někdo kde by mohl být problém?
Ještě jsem zjistil, že ten skript nefunguje pokud se připojuji přes proxy server.
novy script na csfd.cz
http://madmaxx.own.cz/csfd.cz.ifs
Paráda, ale nestahuje mi "Popis filmu". Nešlo by to vyřešit?
Nefunguje zobrazování popisu filmu, jinak všechno jde.
Nefunguje zobrazování popisu filmu, jinak všechno jde.
Snad MadMaxx zapracuje a problém vyřeší, já se k tomu teď bohužel nedostanu.
Mam upravený skript ke dni 31.12. 2006. Fungují všechna pole . Je tam jeden bug - v poli ofic. url jsou dvě lomítka před "film" - nemá vliv na funkci. Udělám jednouduchou stránku na mém hostingu ( http://csfd-amc.thez.info ), kde se budu snažit dávat vždy aktuální verzi skriptu.
_-_-_
Jestli se chcete někdo přidat, napište mi. (stránka bude k dispozici od 2.1.07).
-------------------------------------------------------------------------------------
Tady skript:
http://csfd-amc.thez.info/script/csfd.cz.ifs
-------------------------------------------------------------------------------------
PS. email najdete dole na mé stránce. NO SPAM plz
změna adresy, jinak žádná změna + přidaný skript pro DVD obaly.
Super, dik moc, ja se s tim trapil 3 dny az me napadlo, jestli to uz proste nekdo neudelal...
Po dalsich zmenach na CSFD zamente radek cislo 542 (pod //Info)
timto a budete mit opet k dispozici i popis
LineNr := FindLine('', Page, 0);
Tak už zase nefunguje ani verze 2.4...grrr
Mě verze 2.4 z http://amc.thez.info/script/csfd.cz.ifs funguje (obrázky i popisy), kromě filmů bez výběru jak zde: http://forum.antp.be/phpbb2/viewtopic.php?t=2503&postdays=0&postorder=asc&highlight=csfd&start=100 popisuje "kdyz dam vyhledat film, kterej to najde rovnou, to znamena, ze nemusim vybirat po vyhledavani ze seznamu vice filmu, tak me ho script nenacte" kresomysl napr.: Knoflíkáři, Restart, Kolja, Pupendo, Tlumočnice.
Může to někdo odzkoušet a upravit?
Opraveno a hned jsem vydal dalsi verzi (o te predchozi jsem ti psal v emailu). kdyztak tady jsem jen nahodou, kdyby byl problem tak mail (jeden staci). jinak na ofic. foru je dobre zabehla diskuze.
Díky za tip, jdu to zkusit.
ahoj, používáš ještě program Ant Movie Catalog? Mě už nefunguje žádný ze scriptů na CZ servery (365dni.cz, csfd.cz, fdb.cz), mohl bys některý z nich opět zprovoznit? Díky!
Dneska jsem opravil, na jine se nechystam… (jenom ty svoje)
Na tu stránku jsem se předtím (prostřednictvím Google) díval, ale tehdejší poslední aktualizace byla z r. 2007. Díky za úpravu scriptů!
AMC ještě pužívám, tedy je pravda, že jsem ho neměl už pěkně dlouho zapnutý, takže nevím jak je to se cripty. Nějak není vůbec na nic čas.
Každopádně děkuji za aktualizaci scriptů, přidám je sem, aby byly aktuální.
Dobrý den. Mohl by mi někdo poradit jak ty skripta dostat do katalogu.předem dík.
Pres prave tlacitko a ulozit jako si skript ulozite na plochu. Pote si najdete slozku (vetsinou) C:\Program Files\Ant Movie Catalog\Scripts, smazete puvodni skript (pokud tam je) csfd.ifs a nahrajete z plochy novy.
Pokud pouzivate pouze tento skript, pripadne jen par, tak doporucuji smazat vsechny krome tech par :)
Mám problém s Ant movie catalog 3.5.0, když si chci přidat jakýkoliv film do mého seznamu tak dám Přidat a poté dám získat informace z internetu pomocí scriptu. Zadám jméno filmu a dám enter, ale vyjede mi jen tabulka už s výsledkem scriptu ale bez informací o tom filmu. Nevim co se kde stalo ale nejde to najednou ani mému kámošovi. Dřív sem si před výsledkem scriptu vybral z filmů které to našlo. Nevíte někdo kde je chyba???
43 komentářů