www.image.be script ?

ZeF69 · Post by **ZeF69** » 2004-03-02 20:15:18

Bonjour,

Hyper novice en la matière, je viens juste de télécharger Ant Movie Catalog et je le découvre actuellement... suberbe pour un freeware... il n'a rien à envier à d'autres...

Si je comprend bien la notion de script, est-il possible d'en créer un pour le site www.image.be (pour lequel je puise manuellement toutes les info qui me sont utiles)... si oui, quelqu'un l'a-t-il déjà fait ??? ce serait sympa...

Merci d'avance.

ZeF69 (Belgique - Mons)

Post by **antp** » 2004-03-03 08:42:12

Heu normalement il y a déjà un script pour image.be (c'est même moi qui l'ai fait

), à moins que je l'aie oublié dans l'install ?

ZeF69 · Post by **ZeF69** » 2004-03-03 14:56:56

Exact ! désolé, distraction de ma part...

J'ai essayé, c'est vraiment super et rapide... merci bien antp

j'ai néanmoins quelques questions supplémentaires concernant ce script www.image.be...

1) Concernant la Catégorie : le script ne prend pas la catégorie si la fiche du site www.image.be ne contient qu'un SEUL genre... (ex : kuzco). Est-ce normal ou peut-il être corrigé ?

2) Concernant la Description : le script ne comprend pas les caractères tels que 'oe' comme dans "oeil" ou bien "..." ou "-", ... et les remplace dans le champ par une petite barre verticale (ex : chicago). Est-ce normal ou peut-il être corrigé ??

3) Concernant le Producteur : si plusieurs studios sont présent sur le site, le script ne prend apparement pas le premier mais rien !? (ex : Terminator 3). Est-ce normal ou peut-il être corrigé ??

4) Concernant les Acteurs : pour les films c'est la chaine de caractère "avec:" qui est apparement scannée sur les fiches du site, pour dessins animé et animation c'est la chaîne de caractère "avec les voix de:" qui devrait être utilisée sur le site sinon les acteurs ne sont pas reconnus par le script (ex: kuzco).Est-ce normal ou peut-il être corrigé ??

5) Titre Original/Traduit : pourquoi ne pas recopier le titre original vers le titre traduit si pas de titre spécifique traduit présent sur le site... (ex: chicago)

Merci encore pour ce fabuleux soft...

ZeF69

Post by **antp** » 2004-03-03 15:01:05

J'ai pas beaucoup testé ce script

1. Probablement un bug

2. Ce sont des caractères qui n'existent pas dans la police MS Sans Serif, utilisée pour les champs. Il faudrait que le scripts les modifie alors.

3. idem que 1

4. idem

5. Parce que beaucoup de gens préfèrent laisser le titre traduit vide quand le titre original n'existe pas (en tout cas c'est ce que je fais)

Pour les points 1, 3, 4, tu peux me donner des adresses de fiches comme exemple ?

ZeF69 · Post by **ZeF69** » 2004-03-03 15:16:03

Merci pour le support antp

pour les point 1) et 4)

http://www.image.be/FicheFilmSY.asp?IDObj=924

pour le point 3)

http://www.image.be/FicheFilmSY.asp?IDObj=2529

pour le point 2) ce serait difficile à faire ???

ZeF69

Post by **antp** » 2004-03-03 15:49:16

Non, le 2 sera plus facile à faire que les autres

C'est juste que je ne peux pas prévoir tous les caractères, donc il y aura le même problème avec d'autres caractères spéciaux. Il n'y a que dans la description que ce problème se pose ?

Guest · Post by **Guest** » 2004-03-03 16:53:52

antp wrote:Il n'y a que dans la description que ce problème se pose ?

Oui, apparamment, c'est là qu'il y le plus de probabilité d'y trouver les caractères " à problème "

Je suis navré, j'y connais rien à ce sujet, sinon j'aurais essayé moi-même de comprendre et de corriger les points évoqués précedemment...
Connais-tu un bon tutorial pour apprendre un peu... ?

Penses-tu qu'une ame charitable pourrait faire les modif necessaires pour corriger le "bug" ???

ZeF69 · Post by **ZeF69** » 2004-03-03 16:56:19

Anonymous wrote:Penses-tu qu'une ame charitable pourrait faire les modif necessaires pour corriger le "bug" ???

Ainsi que les autres bugs des points 1.; 3. et 4....

Merci
ZeF69

Post by **antp** » 2004-03-03 18:43:34

Anonymous wrote:Connais-tu un bon tutorial pour apprendre un peu... ?

Sur www.developpez.com parmis les tutoriels Delphi il doit y en avoir qui expliquent les bases. Ça peut servir pour ces scripts qui ressemblent fort à du Delphi.

Anonymous wrote: Penses-tu qu'une ame charitable pourrait faire les modif necessaires pour corriger le "bug" ???

Je vais le faire

C'est moi qui ai fait le script, ces modifs ne demanderont pas beaucoup de temps.
Je ferai ça un de ces soirs, au plus tard vendredi.

ZeF69 · Post by **ZeF69** » 2004-03-03 21:08:08

wow...
Merci pour le lien...
Merci surtout pour la correction des "bugs"...

ZeF69

ZeF69 · Post by **ZeF69** » 2004-03-03 21:52:16

Juste pour info...
je viens de m'apercevoir que le bug existe aussi au niveau du réalisateur... si 2 réalisateurs sur la fiche du film sur le site, le script ne prend pas... ("réalisateur" => "réalisateurs" ?)

example : http://www.image.be/FicheFilmSY.asp?IDObj=1202

Merci.
ZeF69

ZeF69 · Post by **ZeF69** » 2004-03-07 00:09:21

Bonjour Antp,

Je sais que tu es plus que occupé de ces jours avec notamment des préoccupations plus importantes mais as-tu eu le temps de corriger les divers bugs du script www.image.be (voir plus bas)?

Juste pour savoir...

sinon pas de problème je m'armerai de patience

Merci d'avance.

ZeF69

Post by **antp** » 2004-03-07 09:30:09

ZeF69 wrote: Je sais que tu es plus que occupé de ces jours avec notamment des préoccupations plus importantes [...]

Comment tu le sais ?

ZeF69 wrote: [...] mais as-tu eu le temps de corriger les divers bugs du script www.image.be (voir plus bas)?

Pas encore. Je comptais faire ça hier mais je n'en ai pas eu le temps.
Peut-être cet après-midi

Post by **antp** » 2004-03-07 10:27:28

Bon, finalement je l'ai fait ce matin

http://antp.be/temp/Image.be.ifs
Pour les caractères qui apparaissaient mal, j'ai juste corrigé le 'œ' et le '...'
Si tu arrives à en trouver d'autres, il faut les copier-coller pour avoir le caractère exact (parce que par exemple le "-" il y en a plein de différents dans les jeux de caractères).
Ça c'est assez facile à modifier. Il suffit de rajouter une ligne dans le genre des deux qui sont déjà là :

Code: Select all

      Value := StringReplace(Value, 'œ', 'oe');
      Value := StringReplace(Value, '…', '...');

ZeF69 · Post by **ZeF69** » 2004-03-07 15:16:09

WaouW, meric bien Antp,...

Tout fonctionne SAUF

le point 1) et 3)

- Catégorie: ne prend toujours pas si un seul genre présent sur le site (=> 'genre:' pose problème)
http://www.image.be/FicheFilmSY.asp?IDObj=924

- Producteur : ne prend toujours pas si plusieurs studios présent sur le site (=>'studios:' pose problème)
http://www.image.be/FicheFilmSY.asp?IDObj=2529

J'ai regardé dans le nouveau script mais ma piètre connaissance ne suffit pas à comprendre la source d'erreur... d'autant plus que la correction sur les réalisateurS fonctionne elle !!!

Merci également pour le point 2), je compléterais moi-même avec d'eventuels autres caractères spéciaux...

Merci encore et si tu trouves pour les points 1) et 3) çà serait sympa de publier la nouvelle version.

ZeF69

Post by **antp** » 2004-03-07 15:19:39

Je comprends pas pourquoi ça marche pas ; la modif est faite dans le script pourtant

Je vais regarder ça plus tard.

ZeF69 · Post by **ZeF69** » 2004-03-07 15:38:32

j'y comprend pas grand chose mais faut bien que je travaille un peu aussi...
pour catégorie, lorsque le mot 'genre:' est scanné, sur la ligne il n'ya aucun tag '' !!!, il faut peut-être fixer EndPos à la valeur 'fin de la ligne' mais là je sais pas comment faire... pfft j'suis nul.

ZeF69

ZeF69 · Post by **ZeF69** » 2004-03-07 16:11:01

çà fonctionne avec çà.. pour la(les) catégorie(s)...

LineNr := FindLine('Genres:', Page, LineNr);
if LineNr = -1 then
LineNr := FindLine('Genre:', Page, LineNr);
if LineNr > -1 then
begin
Line := Page.GetString(LineNr);
BeginPos := Pos('', Line);
// EndPos := Pos('', Line);
Value := Copy(Line, BeginPos, Length(Line));
HTMLRemoveTags(Value);
SetField(fieldCategory, Value);
end;

Mais dans ce cas, il reprend l'ensenble des genres du sites

si tu as un solution plus propre... merci.
pour ce qui est de producteur, je n'arrive pas à trouver

ZeF69 · Post by **ZeF69** » 2004-03-07 16:25:50

pour le(s) producteur(s)... çà marche aussi avec la correction suivante mais il reprend l'ensemble des studios pas le premier... mais bon à défaut d'autre chose...

LineNr := FindLine('Studio:', Page, LineNr);
if LineNr = -1 then
LineNr := FindLine('Studios:', Page, LineNr);
if LineNr > -1 then
begin
Line := Trim(Page.GetString(LineNr));
BeginPos := Pos('">', Line) + 2;
Value := Copy(Line, BeginPos, Length(Line));
HTMLRemoveTags(Value);
SetField(fieldProducer, Value);
end;

Merci

ZeF69

Post by **antp** » 2004-03-07 19:51:02

ZeF69 wrote:j'y comprend pas grand chose mais faut bien que je travaille un peu aussi...
pour catégorie, lorsque le mot 'genre:' est scanné, sur la ligne il n'ya aucun tag '' !!!, il faut peut-être fixer EndPos à la valeur 'fin de la ligne' mais là je sais pas comment faire... pfft j'suis nul.

Tiens oui, je me basais sur leur changeant la couleur des virgules, mais vu qu'il n'y a alors pas de virgules...
Enfin, il est un peu crado leur code (comme tous les autres sites pour lesquels j'ai fait des scripts d'importation en fait).
Il va falloir que je fasse les modifs un peu plus attentivement