super
Posted: 2009-02-21 13:31:45
Super, ca marche et merci
Et en effet "Chapitre macabre" n'est pas sur Allociné
A un de ces jours
Et en effet "Chapitre macabre" n'est pas sur Allociné
A un de ces jours
Code: Select all
//--OK--------------------------------------------------------------------------
// Prend le titre traduit
SetField(fieldTranslatedTitle,FormatTitre(Trim(MonFindInfo('<H1 style="color: #000000; font-size:18px;
font-weight:bold;text-decoration:none">','</H1>',Line,0)),GetOption('Format du Titre')));
//--OK--------------------------------------------------------------------------
Code: Select all
//--OK--------------------------------------------------------------------------
// Prend le titre traduit
SetField(fieldTranslatedTitle,FormatTitre(Trim(MonFindInfo('class="titre_film">'
,'</A></H1>',Line,0)),GetOption('Format du Titre')));
//--OK--------------------------------------------------------------------------
Code: Select all
//--OK--------------------------------------------------------------------------
// Prend le synopsis
temp := '';
temp := MonFindInfo('histoire de','</font>',Line,1);
temp := MonFindInfo('<font class="link6">','</font>',temp,0);
NoHTML(temp);
Setfield(fieldDescription,temp);
//--OK--------------------------------------------------------------------------
Code: Select all
//--OK--------------------------------------------------------------------------
// Prend le synopsis
temp := '';
temp := MonFindInfo('histoire de','</div>',Line,1);
temp := MonFindInfo('<font class="link6">','</font>',temp,0);
NoHTML(temp);
Setfield(fieldDescription,temp);
//--OK--------------------------------------------------------------------------
C'est vrai que le site a beaucoup changé, mais vous vous débrouillez bien sans moiRaoul_Volfoni wrote: @ Draco31.fr
Salut Draco31.fr
Quand est ce que tu reviens sous windows ? ... ... on s'ennuie sans toi
En ce qui me concerne ... rien de moins sûr !!Draco31.fr wrote:... vous vous débrouillez bien sans moi
Et sous Wine ça passe pas ?Draco31.fr wrote:Par contre, dès qu'un portage d'AMC aura été effectué sur GNU/Linux, je serai heureux de l'utiliser à nouveau, et de parfaire les scripts que j'ai initier !
Quels sont les champs que tu ne récupères pas ? (avec titre des films)chapichapo wrote:D'autres erreurs peuvent subsister encore, car je ne récupère pas tous les champs disponible par le script.
Soit tu es humble, soit tu doute de toi ... mais je te rassure, tu es au moins aussi compétent que moi !Raoul_Volfoni wrote:@ Draco31.fr
En ce qui me concerne ... rien de moins sûr !!Draco31.fr wrote:... vous vous débrouillez bien sans moi
Oui, et non. ça tourne comme un logiciel qui n'est pas prévue pour Linux : c'est très lent !Raoul_Volfoni wrote:Et sous Wine ça passe pas ?Draco31.fr wrote:Par contre, dès qu'un portage d'AMC aura été effectué sur GNU/Linux, je serai heureux de l'utiliser à nouveau, et de parfaire les scripts que j'ai initier !
Code: Select all
temp=MonFindInfo('balise_début','balise_fin',variable_de_ma_page,option_pour_garder_ou_supprimer_les_balise_du_texte)
Code: Select all
SetField(nom_du_champs_dans_la_doc,temp)
Rien n'empêche de faire pareil avec AMC, et en effet ça allège l'ensemble.draco31.fr wrote:Par contre, il y a une différence : GCStar stoque les images hors du catalogue, alors qu'avec AMC j'avais les images dans le catalogue ... le fichier est donc beaucoup plus long à parcourir : c'est peut-être ça qui gênait.
En fait, ormis les champs que tu as cité, je ne récupère pas le champs "Commentaires".Raoul_Volfoni wrote:Quels sont les champs que tu ne récupères pas ? (avec titre des films)
Si tu parles de ces champs là --> (Label du support, Origine, Emprunté par, Type de support, Format vidéo, Format audio, Langues, Sous titres, Résolution, Fréquence, Taille, Disques) C'est normal.
J'attends ta réponse (ou la réponse d'autres utilisateurs) pour voir si il y a d'autres trucs à modifier avant d'envoyer une version corrigée à antp.
Merci pour ces infos qui me seront trés utile à l'avenir, vu que j'utilise ce scrit en premier choix.draco31.fr wrote:Pour les autes informations, il suffit de trouver la ligne dans le source de la page, les balises unique qui l'encadre, et de placer le codeau bon endroit dans le script en fonction de la position de la ligne dans la page source.Code: Select all
temp=MonFindInfo('balise_début','balise_fin',variable_de_ma_page,option_pour_garder_ou_supprimer_les_balise_du_texte)
Ensuite il faut stoquer le résultat dans le champs qui va bien :Voilà !Code: Select all
SetField(nom_du_champs_dans_la_doc,temp)
Ah d'accord, j'viens de tilter ... j'suis long à la détente ... ... Je ne comprenais d'ailleurs pas pourquoi Draco31.fr te parlait de la manière de récupérer d'autres informations ... lui, avait compris avant moi ... le COBOL doit être bon pour les neuroneschapichapo wrote:En fait, ormis les champs que tu as cité, je ne récupère pas le champs "Commentaires".
Je me le réserve pour y placer des infos personnelles.
J'ais testé et il à l'air de récupérer les champs cité dans le champs "Commentaires"Raoul_Volfoni wrote:Ah d'accord, j'viens de tilter ... j'suis long à la détente ... ... Je ne comprenais d'ailleurs pas pourquoi Draco31.fr te parlait de la manière de récupérer d'autres informations ... lui, avait compris avant moi ... le COBOL doit être bon pour les neuroneschapichapo wrote:En fait, ormis les champs que tu as cité, je ne récupère pas le champs "Commentaires".
Je me le réserve pour y placer des infos personnelles.
Donc c'est un choix délibéré de ta part si tu ne récupères pas ce champ.
Sinon, quand on lui demande, le script récupère bien les infos du champ "Commentaires" à savoir :
- La liste des notes avec l'option "Liste des notes" à 1
- Les critiques (CinEmotions + spectateurs) avec l'option "Critiques" à 0
Si il n'y a rien d'autre, je vais envoyer à antp une version corrigée avec tes corrections pour les champs "Titres traduit" et "Description".
Code: Select all
// Prend les réalisateurs
temp := '';
t1 := '';
temp := MonFindInfo('Réalisation :','</font>',Line,0);
Code: Select all
// Prend les réalisateurs
temp := '';
t1 := '';
temp := MonFindInfo('Réalisation :','</font>',Line,0);
Code: Select all
// Prend la compagnie
temp := MonFindInfo('Sociétés de production de','</table>',Line,1);
Code: Select all
// Prend la compagnie
temp := MonFindInfo('Sociétés de production de','</table>',Line,1);