Dobrá zpráva, pro všechny, kteří používají 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ár řá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 určitě 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řílohaVelikost
csfd.cz.zip4.98 KB

Zase tak moc neotravoval -

Zase tak moc neotravoval - je to kluk sikovna :-)

Ahoj, skript je super,

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,

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

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

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.

Asi uz je to malicko s

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.

nenacitaji se mi obrazky s

nenacitaji se mi obrazky s csfd :( ale fungovalo to ale ted uz ne :(

takze je potreba provest


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

Teď jsem se teprv dostal k zadávání nových filmů. Funguje to parádně. Díky.

Opet zmena na www.csfd.cz

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

Ano, všimnul jsem si toho

Ano, všimnul jsem si toho již v pátek. Díky za úpravu, hned jí hodím do ZIPu v článku.

Zase se mi přestaly

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

Včera večer jsem na server teprve nahrál upravenou verzi scriptu.

Nevím,kde je chyba, ale

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.

Takze zde mame dalsi zmenu

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

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

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?

podle me by vas to mohlo zajimat

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

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?

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

Zkoušel jsem a funguje bez problémů.

Mám verzi 1.8 která

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

Ještě jsem zjistil, že ten skript nefunguje pokud se připojuji přes proxy server.

novy script na

novy script na csfd.cz

http://madmaxx.own.cz/csfd.cz.ifs

Paráda, ale nestahuje mi

Paráda, ale nestahuje mi "Popis filmu". Nešlo by to vyřešit?

Nefunguje zobrazování

Nefunguje zobrazování popisu filmu, jinak všechno jde.

Nefunguje zobrazování

Nefunguje zobrazování popisu filmu, jinak všechno jde.

Snad MadMaxx zapracuje a

Snad MadMaxx zapracuje a problém vyřeší, já se k tomu teď bohužel nedostanu.

Mam upravený skript ke dni

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

změna adresy, jinak žádná změna + přidaný skript pro DVD obaly.

csfd-amc.thez.info

Super, dik moc, ja se s tim

Super, dik moc, ja se s tim trapil 3 dny az me napadlo, jestli to uz proste nekdo neudelal...

Po dalsich zmenach na CSFD

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

Tak už zase nefunguje ani verze 2.4...grrr

Mě verze 2.4 z

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

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.

Díky za tip, jdu to zkusit.

ahoj, používáš ještě program

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!

http://amc.thez.info Dneska

http://amc.thez.info

Dneska jsem opravil, na jine se nechystam… (jenom ty svoje)

Na tu stránku jsem se

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

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

Dobrý den. Mohl by mi někdo poradit jak ty skripta dostat do katalogu.předem dík.

Pres prave tlacitko a ulozit

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

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???