[REL] [EN] [FR] Centralisation ScorEpioN [-SEN-]
script allocine.fr
Salut
Je trouve ce script genial !!!!!!!
je n'utilise que lui (sauf quand le film n'est pas sur allocine)
Je voudrais savoir comment faire pour récupérer quelque critique de spectateur en plus des critiques de presse de la page principale.
Par exemple :
- la 1ére critique de la note de 4/4, une pour la note de 3/4, une pour la 2/4 et une pour la 1/4
- ou alors 3 ou 4 commentaire de la note moyenne
Merci pour tout ce boulot
Je trouve ce script genial !!!!!!!
je n'utilise que lui (sauf quand le film n'est pas sur allocine)
Je voudrais savoir comment faire pour récupérer quelque critique de spectateur en plus des critiques de presse de la page principale.
Par exemple :
- la 1ére critique de la note de 4/4, une pour la note de 3/4, une pour la 2/4 et une pour la 1/4
- ou alors 3 ou 4 commentaire de la note moyenne
Merci pour tout ce boulot
Tout d'abord il faut créer une fonction identique à la fonction ladressedesCritiques qui va retourner l'adresse des critiques spectateurs.
Si l'adresse est différente de '' alors lancer une procedure identique à la procédure critiquesPresseComplet.
Dans la procédure critiquesPresseComplet tu rajoute 4 Boolean par exemple :
BoolNote4, BoolNote3, BoolNote2, BoolNote1 qui passe de True à False si une critique avec la note souhaité a été trouvée
Cette solution est la première qui me vient.
Si l'adresse est différente de '' alors lancer une procedure identique à la procédure critiquesPresseComplet.
Dans la procédure critiquesPresseComplet tu rajoute 4 Boolean par exemple :
BoolNote4, BoolNote3, BoolNote2, BoolNote1 qui passe de True à False si une critique avec la note souhaité a été trouvée
Code: Select all
if (BoolNote4=True) and (Note = 4) then
begin
BoolNote4 = False;
// et la on ajoute dans une liste le nom du spectateur, la note donnée, et la critique.
end...
[UPDATE] DVDPOST V01 du 21/04/2005
Ce script utilise les informations du site www.dvdpost.be.
[NEW] Ce script récupére le titre, le réalisateur, le studio, les acteurs, l'année, la durée, le genre, les notes, le public pour qui le film est destiné, et l'affiche.
[NEW] Comme tous mes nouveaux scripts, il est possible d'avoir un log des mises à jour, et de lancer le script de manière automatique en cherchant le meilleur résultat, ou encore sur l'adresse web
[UPDATE] SCOREPIONCOMMONSCRIPT V12 du 21/04/2005
Nécessaire pour pouvoir utiliser mes scripts. Il regroupe des fonctions communes à tous les scripts.
[NEW] Update pour intégrer le nouveau script.
[NEW] Nouvelle fonction MonGetPicture qui effectue le GetPicture seulement si on lui passe autre chose que ''.
[NEW] Nouvelle Fonction FormatFloat pour permettre des calculs plus aisé sur les float (transforme les ',' en '.' & rajoute .0 si pas de décimal).
SCRIPTS POUR :
Si vous rencontrez des problèmes, des bugs, ou que vous souhaiterez des fonctionnalités supplémentaires, postez dans ce topic
Si vous souhaitez être averti en cas de nouvelle version, cochez la case "Notify me when a reply is posted" au moment de poster (vous devez être inscrit)
Ce script utilise les informations du site www.dvdpost.be.
[NEW] Ce script récupére le titre, le réalisateur, le studio, les acteurs, l'année, la durée, le genre, les notes, le public pour qui le film est destiné, et l'affiche.
[NEW] Comme tous mes nouveaux scripts, il est possible d'avoir un log des mises à jour, et de lancer le script de manière automatique en cherchant le meilleur résultat, ou encore sur l'adresse web
[UPDATE] SCOREPIONCOMMONSCRIPT V12 du 21/04/2005
Nécessaire pour pouvoir utiliser mes scripts. Il regroupe des fonctions communes à tous les scripts.
[NEW] Update pour intégrer le nouveau script.
[NEW] Nouvelle fonction MonGetPicture qui effectue le GetPicture seulement si on lui passe autre chose que ''.
[NEW] Nouvelle Fonction FormatFloat pour permettre des calculs plus aisé sur les float (transforme les ',' en '.' & rajoute .0 si pas de décimal).
SCRIPTS POUR :
Si vous rencontrez des problèmes, des bugs, ou que vous souhaiterez des fonctionnalités supplémentaires, postez dans ce topic
Si vous souhaitez être averti en cas de nouvelle version, cochez la case "Notify me when a reply is posted" au moment de poster (vous devez être inscrit)
modif scrit allocine.fr pour integrer commentaire spectateur
salut
je vous remercie pour vos indication pour la modification du script allocine.fr mais je ne sais pas comment faire pour modifier un script .
je ne sais pas faire de programmation
pourriez vous me faire un listing que je pourrais coller dans le script originale???
merci
et encore bravo pour tout ce boulot
je vous remercie pour vos indication pour la modification du script allocine.fr mais je ne sais pas comment faire pour modifier un script .
je ne sais pas faire de programmation
pourriez vous me faire un listing que je pourrais coller dans le script originale???
merci
et encore bravo pour tout ce boulot
Re: UPDATE & NEW SCRIPT
[UPDATE] ALLOCINE (avec affiche allocine, amazon ou cinefil) V40 du 25/04/2005
Ce script utilise les informations des sites www.allocine.fr, www.amazon.fr & www.cinefil.com.
[NEW] Nouvelle fonction pour récupérer une critique spectateur par note (0, 1, 2, 3, 4).
[UPDATE] ANIMEKA V32 du 25/04/2005
Ce script utilise les informations du site www.animeka.com.
[NEW] Amélioration de la fonction recherche en supprimant les articles.
[NEW] Les articles dans les titres sont déplacé en début de titres (Arme Ultime (L') -> L'Arme Ultime).
[UPDATE] CINEMASIE V22 du 25/04/2005
Ce script utilise les informations du site www.cinemasie.com.
[NEW] Amélioration de la récupération des images.
[UPDATE] SCOREPIONCOMMONSCRIPT V13 du 25/04/2005
Nécessaire pour pouvoir utiliser mes scripts. Il regroupe des fonctions communes à tous les scripts.
[NEW] Nouvelle fonction pour supprimer les articles (Le, la les...).
[NEW] Nouvelle fonction pour déplacer les articles en début de titre (Arme Ultime (L') -> L'Arme Ultime).
[NEW] Des modifications mineurs.
SCRIPTS POUR :
Si vous rencontrez des problèmes, des bugs, ou que vous souhaiterez des fonctionnalités supplémentaires, postez dans ce topic
Si vous souhaitez être averti en cas de nouvelle version, cochez la case "Notify me when a reply is posted" au moment de poster (vous devez être inscrit)
Ce script utilise les informations des sites www.allocine.fr, www.amazon.fr & www.cinefil.com.
[NEW] Nouvelle fonction pour récupérer une critique spectateur par note (0, 1, 2, 3, 4).
[UPDATE] ANIMEKA V32 du 25/04/2005
Ce script utilise les informations du site www.animeka.com.
[NEW] Amélioration de la fonction recherche en supprimant les articles.
[NEW] Les articles dans les titres sont déplacé en début de titres (Arme Ultime (L') -> L'Arme Ultime).
[UPDATE] CINEMASIE V22 du 25/04/2005
Ce script utilise les informations du site www.cinemasie.com.
[NEW] Amélioration de la récupération des images.
[UPDATE] SCOREPIONCOMMONSCRIPT V13 du 25/04/2005
Nécessaire pour pouvoir utiliser mes scripts. Il regroupe des fonctions communes à tous les scripts.
[NEW] Nouvelle fonction pour supprimer les articles (Le, la les...).
[NEW] Nouvelle fonction pour déplacer les articles en début de titre (Arme Ultime (L') -> L'Arme Ultime).
[NEW] Des modifications mineurs.
SCRIPTS POUR :
Si vous rencontrez des problèmes, des bugs, ou que vous souhaiterez des fonctionnalités supplémentaires, postez dans ce topic
Si vous souhaitez être averti en cas de nouvelle version, cochez la case "Notify me when a reply is posted" au moment de poster (vous devez être inscrit)
modif scrit allocine.fr pour integrer commentaire spectateur
Re salut
Je me suis quand meme lancer dans l'experience de la programmation, mais sans grand succés.
voici les modifs que j'ai apporté sur vos indication:
juste après // Critiques presse :
// Critiques spectateurs
if CanSetField(fieldComments) then
begin
if ((GetOption('Critiques spectateur') <> 0) and (pos('<h3><b>Critiques Spectateurs</b></h3>', Line) > 0)) then
begin
Value := GetField(fieldComments)+'Critiques spectateur :'+#13#10#13#10;
if (GetOption('Critiques specteur') =1) then
begin
repeat
// Début boucle
BeginPos := pos('<td valign="top"><h4><b>', Line);
delete(Line, 1, BeginPos-1);
// Journal et nom du critique
aucun := findInfo('<h4><b>', '</h4><img', Line,'0');
Value := Value+formatTitre(aucun,GetOption('Casse Choisie'));
// Note
aucun := findInfo('etoile_', '.gif', Line,'0');
Value := Value+' - Note : '+aucun+ '/4 '+#13#10;
// la critique
aucun := findInfo('<div align="justify"><h4>', '</h4></div>', Line,'0');
aucun := StringReplace(aucun, ' ', '');
Value := Value+aucun+#13#10#13#10;
// Fin Boucle
delete(Line, 1, length('<td valign="top"><h4><b>'));
BeginPos := pos('<td valign="top"><h4><b>', Line);
until (BeginPos = 0);
SetField(fieldComments, Trim(Value));
end else if (GetOption('Critiques Presse') = 2) and (adressePresse <> '') then
begin
La_liste := Value;
numPage := 1;
critiquesPresseComplet(adressePresse);
end;
end;
end;
et juste après // RETOURNE L'ADRESSE DES CRITIQUES PRESSE:
//------------------------------------------------------------------------------
// RETOURNE L'ADRESSE DES CRITIQUES spectateurs
//------------------------------------------------------------------------------
function ladressedesCritiquesspectateurs(Line : String) : String;
begin
if (pos('<b>Critiques<br />spectateurs</b></h5></a>',Line) <> 0) then
result := urlAllocine+'/film/critiquepublic_gen_cfilm='+findInfo('/film/critiquepublic_gen_cfilm=', '.html', Line,'0')+'.html'
else
result := '';
end;
Mais je dois avouer que le script ainsi modifier ne fait rien de plus.
je n'est pas ajouter de procedure Boolean car je ne sais pas comment faire.
Merci
Je me suis quand meme lancer dans l'experience de la programmation, mais sans grand succés.
voici les modifs que j'ai apporté sur vos indication:
juste après // Critiques presse :
// Critiques spectateurs
if CanSetField(fieldComments) then
begin
if ((GetOption('Critiques spectateur') <> 0) and (pos('<h3><b>Critiques Spectateurs</b></h3>', Line) > 0)) then
begin
Value := GetField(fieldComments)+'Critiques spectateur :'+#13#10#13#10;
if (GetOption('Critiques specteur') =1) then
begin
repeat
// Début boucle
BeginPos := pos('<td valign="top"><h4><b>', Line);
delete(Line, 1, BeginPos-1);
// Journal et nom du critique
aucun := findInfo('<h4><b>', '</h4><img', Line,'0');
Value := Value+formatTitre(aucun,GetOption('Casse Choisie'));
// Note
aucun := findInfo('etoile_', '.gif', Line,'0');
Value := Value+' - Note : '+aucun+ '/4 '+#13#10;
// la critique
aucun := findInfo('<div align="justify"><h4>', '</h4></div>', Line,'0');
aucun := StringReplace(aucun, ' ', '');
Value := Value+aucun+#13#10#13#10;
// Fin Boucle
delete(Line, 1, length('<td valign="top"><h4><b>'));
BeginPos := pos('<td valign="top"><h4><b>', Line);
until (BeginPos = 0);
SetField(fieldComments, Trim(Value));
end else if (GetOption('Critiques Presse') = 2) and (adressePresse <> '') then
begin
La_liste := Value;
numPage := 1;
critiquesPresseComplet(adressePresse);
end;
end;
end;
et juste après // RETOURNE L'ADRESSE DES CRITIQUES PRESSE:
//------------------------------------------------------------------------------
// RETOURNE L'ADRESSE DES CRITIQUES spectateurs
//------------------------------------------------------------------------------
function ladressedesCritiquesspectateurs(Line : String) : String;
begin
if (pos('<b>Critiques<br />spectateurs</b></h5></a>',Line) <> 0) then
result := urlAllocine+'/film/critiquepublic_gen_cfilm='+findInfo('/film/critiquepublic_gen_cfilm=', '.html', Line,'0')+'.html'
else
result := '';
end;
Mais je dois avouer que le script ainsi modifier ne fait rien de plus.
je n'est pas ajouter de procedure Boolean car je ne sais pas comment faire.
Merci
modif scrit allocine.fr pour integrer commentaire spectateur
hello
Merci pour ton travail de modification du script pour ajouter les critiques spectateur.
il reste un petit bug cependant: il me donne des critiques avec du code source de la page internet. ce qui donne ceci par exemple pour le film : "virgin suicide" :
Critiques Spectateurs :
vernita</b> - le 18/04/2005 - Note : 4/4
"The Virgin suicides" est un de mes film préférés. Sofia Coppola a réalisé son premier film de manière troublante comme j'aime : la photo est magnifique et les images sont d'une beauté soignée tout comme les jeunes actrices. D'ailleurs Kirsten Dunst, qui d'habitude n'est pas d'une beauté renversante, est magnifique dans ce film. Bref, "The Virgin Suicides" est un film qui ne laisse pas indifférent dans le bon sens du terme : on sort de la projection émerveillé, troublé exactement comme si on venait de regarder un film qui nous aurait coupé du monde le temps d'1 heure 36 minutes.
<br /><a href="/communaute/forum/identite.html?userid=Z20040816114843657919827" class="link1">
nini4</b> - le 14/04/2005 - Note : 3/4
Magnifique film , brillante realisatrice.Malgrès quelque inconvenient dans le scenario cette realisatrice suivant les traces de son père reussira peut etre un jour a arriver a la cheville de son papa.
<br /><a href="/communaute/forum/identite.html?userid=Z20050413211805697353971" class="link1">
fiona06</b> - le 15/04/2005 - Note : 2/4
J'ai pas mal hésité entre attribuer deux ou trois étoiles à ce film. J'ai moi aussi était attirée par ce film en entendant les nombreuses critiques élogieuses à son sujet. Je les trouve justifier mais pas pour tout le film... A partir du moment où les parents decident d'enfermer leurs filles, le film traîne en longueur et on attend qu'une chose : quand vont-elles se donner la mort, issue révéler dès le début. Et bien que la première partie du film soit intéressante, je trouve néanmoins que les personnages ne sont pas très attachants. Reste que la bo est mangnifique et la réalisation attractive. A voir sans être indispensable.
<br /><a href="/communaute/forum/identite.html?userid=Z20050318200514757771514" class="link1">
LaLorelei</b> - le 26/11/2004 - Note : 1/4
Bon bon bon... Ben j'ai trouvé ce film fade à tout point de vue, tant au niveau de l'histoire, des personnages, de la réalisation... Trop de questions sont posées sans jamais trouver de réponse. A trop miser sur le "mystère", j'en suis venue à réellement me demander si mystère il y avait... Bref, je n'ai pas aimé.
<br /><a href="/communaute/forum/identite.html?userid=Z20041007162101220539937" class="link1">
ElephantK</b> - le 04/02/2005 - Note : 0/4
Film sans grande originalité, très conventionnel, que certains considèrent comme original alors que ( comme quelqu'un l'a indiqué) l'idée de construire un film autour d'une "ambiance énigmatique sucitée par un suicide de jeunes vierges" a tout simplement été plagiée sur Picnic At Hanging Rock de Peter Weir, qui est à milles lieues au dessus du film de Coppola et le relègue au rang de bien pâle alternative.
Donc je conseillerais à ceux qui osent parler de chef-d'oeuvre concernant Virgin Suicides d'aller voir Picnic At Hanging Rock et ça leur fera certainement revoir leur jugement. ( 0 parceque ce film, en plus d'être moyen, a une réputation non justifiée)
<br /><a href="/communaute/forum/identite.html?userid=Z20030903225633783634983" class="link1">
J'essaye de voir si je peux comprendre d'ou viens le probleme, mais j'ai peur que mes faible connaissance en programmation ne soit pas suffisante.
Merci pour ta reponse et ta mofification si rapide.
Merci pour ton travail de modification du script pour ajouter les critiques spectateur.
il reste un petit bug cependant: il me donne des critiques avec du code source de la page internet. ce qui donne ceci par exemple pour le film : "virgin suicide" :
Critiques Spectateurs :
vernita</b> - le 18/04/2005 - Note : 4/4
"The Virgin suicides" est un de mes film préférés. Sofia Coppola a réalisé son premier film de manière troublante comme j'aime : la photo est magnifique et les images sont d'une beauté soignée tout comme les jeunes actrices. D'ailleurs Kirsten Dunst, qui d'habitude n'est pas d'une beauté renversante, est magnifique dans ce film. Bref, "The Virgin Suicides" est un film qui ne laisse pas indifférent dans le bon sens du terme : on sort de la projection émerveillé, troublé exactement comme si on venait de regarder un film qui nous aurait coupé du monde le temps d'1 heure 36 minutes.
<br /><a href="/communaute/forum/identite.html?userid=Z20040816114843657919827" class="link1">
nini4</b> - le 14/04/2005 - Note : 3/4
Magnifique film , brillante realisatrice.Malgrès quelque inconvenient dans le scenario cette realisatrice suivant les traces de son père reussira peut etre un jour a arriver a la cheville de son papa.
<br /><a href="/communaute/forum/identite.html?userid=Z20050413211805697353971" class="link1">
fiona06</b> - le 15/04/2005 - Note : 2/4
J'ai pas mal hésité entre attribuer deux ou trois étoiles à ce film. J'ai moi aussi était attirée par ce film en entendant les nombreuses critiques élogieuses à son sujet. Je les trouve justifier mais pas pour tout le film... A partir du moment où les parents decident d'enfermer leurs filles, le film traîne en longueur et on attend qu'une chose : quand vont-elles se donner la mort, issue révéler dès le début. Et bien que la première partie du film soit intéressante, je trouve néanmoins que les personnages ne sont pas très attachants. Reste que la bo est mangnifique et la réalisation attractive. A voir sans être indispensable.
<br /><a href="/communaute/forum/identite.html?userid=Z20050318200514757771514" class="link1">
LaLorelei</b> - le 26/11/2004 - Note : 1/4
Bon bon bon... Ben j'ai trouvé ce film fade à tout point de vue, tant au niveau de l'histoire, des personnages, de la réalisation... Trop de questions sont posées sans jamais trouver de réponse. A trop miser sur le "mystère", j'en suis venue à réellement me demander si mystère il y avait... Bref, je n'ai pas aimé.
<br /><a href="/communaute/forum/identite.html?userid=Z20041007162101220539937" class="link1">
ElephantK</b> - le 04/02/2005 - Note : 0/4
Film sans grande originalité, très conventionnel, que certains considèrent comme original alors que ( comme quelqu'un l'a indiqué) l'idée de construire un film autour d'une "ambiance énigmatique sucitée par un suicide de jeunes vierges" a tout simplement été plagiée sur Picnic At Hanging Rock de Peter Weir, qui est à milles lieues au dessus du film de Coppola et le relègue au rang de bien pâle alternative.
Donc je conseillerais à ceux qui osent parler de chef-d'oeuvre concernant Virgin Suicides d'aller voir Picnic At Hanging Rock et ça leur fera certainement revoir leur jugement. ( 0 parceque ce film, en plus d'être moyen, a une réputation non justifiée)
<br /><a href="/communaute/forum/identite.html?userid=Z20030903225633783634983" class="link1">
J'essaye de voir si je peux comprendre d'ou viens le probleme, mais j'ai peur que mes faible connaissance en programmation ne soit pas suffisante.
Merci pour ta reponse et ta mofification si rapide.
Voici ce que j'obtiens moi pour le film "Virgin Suicides", le problème n'est pas lié au script car j'utilise une fonction HTMLRemoveTags qui supprime les tags html. Je te conseille donc de réessayer sur un film à la fois.
Code: Select all
Critiques Spectateurs :
vernita - le 18/04/2005 - Note : 4/4
"The Virgin suicides" est un de mes film préférés. Sofia Coppola a réalisé son premier film de manière troublante comme j'aime : la photo est magnifique et les images sont d'une beauté soignée tout comme les jeunes actrices. D'ailleurs Kirsten Dunst, qui d'habitude n'est pas d'une beauté renversante, est magnifique dans ce film. Bref, "The Virgin Suicides" est un film qui ne laisse pas indifférent dans le bon sens du terme : on sort de la projection émerveillé, troublé exactement comme si on venait de regarder un film qui nous aurait coupé du monde le temps d'1 heure 36 minutes.
nini4 - le 14/04/2005 - Note : 3/4
Magnifique film , brillante realisatrice.Malgrès quelque inconvenient dans le scenario cette realisatrice suivant les traces de son père reussira peut etre un jour a arriver a la cheville de son papa.
fiona06 - le 15/04/2005 - Note : 2/4
J'ai pas mal hésité entre attribuer deux ou trois étoiles à ce film. J'ai moi aussi était attirée par ce film en entendant les nombreuses critiques élogieuses à son sujet. Je les trouve justifier mais pas pour tout le film... A partir du moment où les parents decident d'enfermer leurs filles, le film traîne en longueur et on attend qu'une chose : quand vont-elles se donner la mort, issue révéler dès le début. Et bien que la première partie du film soit intéressante, je trouve néanmoins que les personnages ne sont pas très attachants. Reste que la bo est mangnifique et la réalisation attractive. A voir sans être indispensable.
LaLorelei - le 26/11/2004 - Note : 1/4
Bon bon bon... Ben j'ai trouvé ce film fade à tout point de vue, tant au niveau de l'histoire, des personnages, de la réalisation... Trop de questions sont posées sans jamais trouver de réponse. A trop miser sur le "mystère", j'en suis venue à réellement me demander si mystère il y avait... Bref, je n'ai pas aimé.
ElephantK - le 04/02/2005 - Note : 0/4
Film sans grande originalité, très conventionnel, que certains considèrent comme original alors que ( comme quelqu'un l'a indiqué) l'idée de construire un film autour d'une "ambiance énigmatique sucitée par un suicide de jeunes vierges" a tout simplement été plagiée sur Picnic At Hanging Rock de Peter Weir, qui est à milles lieues au dessus du film de Coppola et le relègue au rang de bien pâle alternative. Donc je conseillerais à ceux qui osent parler de chef-d'oeuvre concernant Virgin Suicides d'aller voir Picnic At Hanging Rock et ça leur fera certainement revoir leur jugement. ( 0 parceque ce film, en plus d'être moyen, a une réputation non justifiée)
petit bug script allocine
Salut tout d'abord je tiens à féliciter l'auteur du logiciel!!!
Juste pr signaler un petit bug du script allociné. Pour tous mes films, il me met une durée en minutes fausse.
Voilà
Si vous pouviez régler ce problème ce serait très sympa.
Merci beaucoup!!!
Juste pr signaler un petit bug du script allociné. Pour tous mes films, il me met une durée en minutes fausse.
Voilà
Si vous pouviez régler ce problème ce serait très sympa.
Merci beaucoup!!!
script allociné sur les séries
Salut,
Il y a une nouvelle section "séries" sur allociné. Serait-il possible de faire un script pour récupérer les infos de cette section ?
Par exemple une répartition par saison serait bien
ei une liste des épisodes de la saison avec les résumés en commentaire serait bien aussi.
Sans vouloir abuser
Merci d'avance.
Il y a une nouvelle section "séries" sur allociné. Serait-il possible de faire un script pour récupérer les infos de cette section ?
Par exemple une répartition par saison serait bien
ei une liste des épisodes de la saison avec les résumés en commentaire serait bien aussi.
Sans vouloir abuser
Merci d'avance.
Salut ScorEpion,
et merci pour pour tous tes scripts, la fonction de mise à jour automatique est vraiment géniale...
j'utilise quotidiennement le script Allociné avec l'image Cinéfil et ça marche nickel
Venons en au fait qui m'amène à poster, il me semble avoir trouvé un bug dans le script Amazon.fr. Quand plusieurs résultats sont trouvés ton script n'en propose qu'un sur deux (en général les numéros pairs). Exemple: si Amazon propose 10 résultats, la liste n'en affichera que 5 (les 2, 4, 6, 8 et 10).
En supprimant (ou en commentant) les lignes 63 et 64 dans la procédure procedure recupAmazon
puis en supprimant (ou en commentant) les lignes 251 et 252 dans la fonction recupTitle
ça marche beaucoup mieux
Voilà, c'était les 20 centimes d'euros d'un débutant en programmation.
A plus
----------------------------
Nosidor
et merci pour pour tous tes scripts, la fonction de mise à jour automatique est vraiment géniale...
j'utilise quotidiennement le script Allociné avec l'image Cinéfil et ça marche nickel
Venons en au fait qui m'amène à poster, il me semble avoir trouvé un bug dans le script Amazon.fr. Quand plusieurs résultats sont trouvés ton script n'en propose qu'un sur deux (en général les numéros pairs). Exemple: si Amazon propose 10 résultats, la liste n'en affichera que 5 (les 2, 4, 6, 8 et 10).
En supprimant (ou en commentant) les lignes 63 et 64 dans la procédure procedure recupAmazon
Code: Select all
procedure recupAmazon(Line, title : String);
var
StartPos: Integer;
couple, titre, adresse : String;
begin
listeResultat := TStringList.Create;
StartPos := pos('<a href=/exec/obidos/ASIN/', Line);
repeat
delete(Line, 1, StartPos+length('<a href=/exec/obidos/ASIN/')-1);
//ajoute les films
listeResultat.Add(recupTitle(Line)+'|'+AmazonUrl+copy(Line,0,pos('qid', Line)-1));
StartPos := pos('http://images-eu.amazon.com/images/P/', Line);
delete(Line, 1, StartPos-1);
//ligne 63 StartPos := pos('<b>', Line);
//ligne 64 delete(Line, 1, StartPos-1);
StartPos := pos('<a href=/exec/obidos/ASIN/', Line);
until (StartPos = 0);
Code: Select all
function recupTitle(Line : String) : String;
var
title : String;
StartPos: Integer;
begin
//ligne 251 StartPos := pos('http://images-eu.amazon.com/images/P/', Line);
//ligne 252 delete(Line, 1, StartPos-1);
StartPos := pos('<b>', Line);
delete(Line, 1, StartPos-1);
title := copy(Line, 1, pos('</b></a>', Line)-1);
HTMLRemoveTags(title);
title := StringReplace(title, #13#10, '');
result := title;
end;
Voilà, c'était les 20 centimes d'euros d'un débutant en programmation.
A plus
----------------------------
Nosidor
modif scrit allocine.fr pour integrer commentaire spectateur
bonjour
CA MARCHE
le probléme devais venir de mon install de ant movie catalog.
j'ai retelecharger tous les scripts et le script commun et sa marche.
merci pour tous ce travail et cette patiente.
Super boulot
CA MARCHE
le probléme devais venir de mon install de ant movie catalog.
j'ai retelecharger tous les scripts et le script commun et sa marche.
merci pour tous ce travail et cette patiente.
Super boulot
Rentrant tout juste de vacances je regarderai cela une fois mon cerveau remis en état de fonctionner...
Modification des scripts Amazon (FR) et Amazon Images (FR) :
Problème de la liste de résultats [OK]
Modifications du scripts Allociné (FR) :
Problème de la liste de résultats amazon [OK]
Mode Serie [En cours]
> Recherche Série [OK]
> Titre et titre original [OK]
> Année, Catégorie et Durée [OK]
> Synopsis [OK]
> Acteurs [OK]
> Image allocine ou amazon [OK]
> Détails des saisons [En cours]
Modification des scripts Amazon (FR) et Amazon Images (FR) :
Problème de la liste de résultats [OK]
Modifications du scripts Allociné (FR) :
Problème de la liste de résultats amazon [OK]
Mode Serie [En cours]
> Recherche Série [OK]
> Titre et titre original [OK]
> Année, Catégorie et Durée [OK]
> Synopsis [OK]
> Acteurs [OK]
> Image allocine ou amazon [OK]
> Détails des saisons [En cours]
Re: UPDATE & NEW SCRIPT
[UPDATE] ALLOCINE (avec affiche allocine, amazon ou cinefil) V41 du 10/05/2005
Ce script utilise les informations des sites www.allocine.fr, www.amazon.fr & www.cinefil.com.
[NEW] Nouveau mode Film ou Série (la maj par url fonctionne quelque soit le mode choisi).
[BUGFIX] Correction d'un bug dans la liste des résultats amazon.
[BUGFIX] amélioration de la récupération de l'image amazon.
[UPDATE] AMAZON.FR V10 du 10/05/2005
Ce script utilise les informations du site www.amazon.fr.
[BUGFIX] Correction d'un bug dans la liste des résultats amazon.
[BUGFIX] amélioration de la récupération de l'image amazon.
[UPDATE] AMAZON.FR (ONLY IMAGE)V10 du 10/05/2005
Ce script utilise les informations du site www.amazon.fr.
[BUGFIX] Correction d'un bug dans la liste des résultats amazon.
[BUGFIX] amélioration de la récupération de l'image amazon.
[UPDATE] SCOREPIONCOMMONSCRIPT V14 du 10/05/2005
Nécessaire pour pouvoir utiliser mes scripts. Il regroupe des fonctions communes à tous les scripts.
[NEW] Nouvelle fonction pour supprimer les sauts de lignes mutliples.
[NEW] Nouvelle fonction pour supprimer les tabultations.
[NEW] Des modifications mineurs.
SCRIPTS POUR :
Si vous rencontrez des problèmes, des bugs, ou que vous souhaiterez des fonctionnalités supplémentaires, postez dans ce topic
Si vous souhaitez être averti en cas de nouvelle version, cochez la case "Notify me when a reply is posted" au moment de poster (vous devez être inscrit)
Ce script utilise les informations des sites www.allocine.fr, www.amazon.fr & www.cinefil.com.
[NEW] Nouveau mode Film ou Série (la maj par url fonctionne quelque soit le mode choisi).
[BUGFIX] Correction d'un bug dans la liste des résultats amazon.
[BUGFIX] amélioration de la récupération de l'image amazon.
[UPDATE] AMAZON.FR V10 du 10/05/2005
Ce script utilise les informations du site www.amazon.fr.
[BUGFIX] Correction d'un bug dans la liste des résultats amazon.
[BUGFIX] amélioration de la récupération de l'image amazon.
[UPDATE] AMAZON.FR (ONLY IMAGE)V10 du 10/05/2005
Ce script utilise les informations du site www.amazon.fr.
[BUGFIX] Correction d'un bug dans la liste des résultats amazon.
[BUGFIX] amélioration de la récupération de l'image amazon.
[UPDATE] SCOREPIONCOMMONSCRIPT V14 du 10/05/2005
Nécessaire pour pouvoir utiliser mes scripts. Il regroupe des fonctions communes à tous les scripts.
[NEW] Nouvelle fonction pour supprimer les sauts de lignes mutliples.
[NEW] Nouvelle fonction pour supprimer les tabultations.
[NEW] Des modifications mineurs.
SCRIPTS POUR :
Si vous rencontrez des problèmes, des bugs, ou que vous souhaiterez des fonctionnalités supplémentaires, postez dans ce topic
Si vous souhaitez être averti en cas de nouvelle version, cochez la case "Notify me when a reply is posted" au moment de poster (vous devez être inscrit)
Dans les derniers films que j'ai importés avec le script Allociné, seule la première lettre du prénom des acteurs est en majuscule ; la première lettre du nom est en minuscule. Or sur le site il y a bien la majuscule. Tu as fait une modif récemment ? (idem pour le nom du personnage qu'ils interprètent)
Le nom des acteurs est formaté selon les préférences de formatage du titre. On peut éventuellement souhaiter un formatage différent pour le titre et les acteurs...
J'ajoute qu'a mon avis il manque une option, j'aimerais bien qu'on ait le choix de laisser la casse du titre (et des acteurs) telle quelle est saisie.
J'en profite pour ajouter une ou deux autres suggestions.
Toujours pour la liste des acteurs j'aimerais pouvoir choisir le séparateur. Par exemple un CR (#13#10) au lieu de la virgule.
Ce serait sympa d'ajouter une option "demander à l'utilisateur" pour le mode films ou séries (avec films par défaut ou séries par défaut)
Merci d'avance
J'ajoute qu'a mon avis il manque une option, j'aimerais bien qu'on ait le choix de laisser la casse du titre (et des acteurs) telle quelle est saisie.
J'en profite pour ajouter une ou deux autres suggestions.
Toujours pour la liste des acteurs j'aimerais pouvoir choisir le séparateur. Par exemple un CR (#13#10) au lieu de la virgule.
Ce serait sympa d'ajouter une option "demander à l'utilisateur" pour le mode films ou séries (avec films par défaut ou séries par défaut)
Merci d'avance
Cela vient d'une modification que j'avais faites dans le script commun.antp wrote:Dans les derniers films que j'ai importés avec le script Allociné, seule la première lettre du prénom des acteurs est en majuscule ; la première lettre du nom est en minuscule. Or sur le site il y a bien la majuscule. Tu as fait une modif récemment ? (idem pour le nom du personnage qu'ils interprètent)
Cela sera corrigé aujourd'hui.
Je rajoute cette fonctionnalité.nosidor wrote:J'ajoute qu'a mon avis il manque une option, j'aimerais bien qu'on ait le choix de laisser la casse du titre (et des acteurs) telle quelle est saisie.
Il te faudra modifier le script par toi même, en effet, la liste d'option est déjà bien longue.nosidor wrote:Toujours pour la liste des acteurs j'aimerais pouvoir choisir le séparateur. Par exemple un CR (#13#10) au lieu de la virgule.
Là je ne comprend pas, merci de me donner plus de précisions, en effet on peut déjà choisir le mode série ou le mode film, et si l'on utilise le type de lancement 3 (MAJ auto par l'url) le script mais bien à jour les films et les sériesnosidor wrote: Ce serait sympa d'ajouter une option "demander à l'utilisateur" pour le mode films ou séries (avec films par défaut ou séries par défaut)