modhack

oui tu fait ce que tu veux apres tes grands sinon ce que je veux savoir , c'est si le protocole nntp peut etre geré sous XBMC.

recuperer les infos d'un post rien d'illegal

Bonjour à tous, Voila je cherche des personnes qui sont interessé pour travailler sur un projet qui me tient a coeur sur XBMC. Il s'agit d'un "grabbeur de news", ou plus vulgairement un newsleecher. Je ne vais pas épiloguer sur les Newsgroups, mais ceux qui connaissent le sujet savent de quoi je parle. 1. généralités # Lancement de l'interface se rapprochant de www.newzbin.com # Selection des differentes categorie # Affichage des .nzb # Posssibilitée de mettre plusieurs .nzb dans un "bookmark" # Gestion des .nzb ( selection - effacer - recuperer ) # recuperation du post # Traitement des fichiers recupérer (.rar) # prise en charge du fichier .sfv et .par2 pour la recuperation des archives # Decompression des fichiers dans un dossier 2. configuration # Configuration dans un fichier .conf des logins et mot de passe pour newzbin.com # Configuration dans un fichier .conf de l'adresse du server de news plus les mdp et login si besoin # Selection d'un dossier de destination pour les fichiers recupérés # Selection du nombre de ports ouverts pour le serveur 3. Sources # Script qui grab les .nzb de newzbin.com http://producto-valvo.com/~freddie/grabnzb.py # Script qui leech les posts d'un fichier .nzb http://www.madcowdisease.org/projects.php/pynewsleecher 4. conclusion Voila si vous etes interessé par le sujet (optionellement si vous etes freebox) merci de me contacter par msn ou de repondre à ce fil. Modhack

ok c'est plus claire. Oui je pense qu'un sript python peut facilement operer sur le sujet.

je t'avous franchement que j'ai du mal a comprendre ce que tu veux faire. Pour ma part j'ai deux bases amc, une qui correspond aux films sur la xbox et l'autre qui contient tous les films vus jusqu'a present. J'ai correlé le fichier xbmc.xml avec Myvideo3.db est c'est parfait pour avoir sa videotech(xbox) disponible sur PC

Tu peux seulement via SXT "exporter" ton fichier il l'enregistrera en fichier Myvideo3.db par contre les images ne sont pas stocké dans se fichier. je pense que l'on pourrais rajouter une option pour que SXT exporte aussi les images dans le meme dossier ou se trouve le fichier Myvideo3.db Sinon je ne sais pas comment faire la manipe hors SXT vus qu'a l'origine je m'etais posé sur le sujet et je t'avoue que mes recherches n'on pas été tres fructueuses.

c'est prometeur

non ne t'inquietes pas. Lorsque tu vas essayer d'enregistrer en XML le programme te precise que le fichier ne peut contenir les images et il vas donc les enrgistrer dans le meme repertorie ou se trouve ton fichier. une image par fiche de film est ainsi donc crée

toujour fan de tes scripts

Edites le fichier DialogSubMenu.xml avec wordpad par exemple ensuite tu cherches vers la fin du fichier vers ca <label>R.A.M.</label> Ensuite si tu veux rajouter ou changer les boutons tu choisis "label" c'est le nom de ton raccourcis tu selectionne "yes" pour qu'il sois visible et tu rajoutes le lien vers ton script <visible>yes</visible> <type>button</type> <execute>q:\scripts\AQTbrowser.py</execute> <id>1115</id> <label>Movie Trailers</label> voili voilou

c'est que l'installation n'a pas fonctionner correctement. Car normalement tu devrais avoir ton service XBMS. Regarde si tu n'as pas un service ccxgui je sais plus quoi qui serais toujours en place. Si c'est le cas desinstalle le et reinstalle SXT. tient regarde le post ici http://www.gueux-forum.net/index.php?showtopic=37812

tu dois normalement enregistrer en format XML, il te proposeras d'enregistrer les images avec

voila je vous ai mis a disposition la version 1.1 de xbmc en download sur http://www.xbmc.org LIEN DIRECT

voila je vous ai mis a disposition la version 1.1 de xbmc en download sur http://www.xbmc.org lien direct

Ce fut un tres bon concour, et je suis tres impressioné par la qualité de certains tutos. Adoubeur ton tuto ma tellement plus, que je suis en train de remodeler celui de SXT a ta sauce Bravo à tous pour vos tutos et j'esperes que nous avons beaucoup aidé la communauté XBOX débutante

fait un clique droit sur le poste de travailet selectionne "gerer" ensutie vas sur la liste des services et regarde si le service XBMS est installé

merci pour tes remarques, j'apprecis. Je suis content de faire partager ma passion.

voila j'ai tout expliqué dans le post ci dessous http://www.gueux-forum.net/index.php?act=ST&f=46&t=37697

Dus au changement du site AlloCiné, vous devez changer le script d'importation depuis internet sous Ant Movie Catalogue. Appuyez sur F6 et editez le "script Allociné small pic" par exemple remplacez tout le script par celui ci dessous. // GETINFO SCRIPTING// Allociné (FR) - Recherche de films (Option à modifier avec "Admin Allociné") - by ScorEpioN(*************************************************** * Movie importation script for: * * Allociné France, http://www.allocine.fr * * * * Script Allociné v7 du 11/10/2004 by ScorEpioN * * * * Ancienne version : * * faite par Antoine Potten * * améliorations par Soltan * * * * For use with Ant Movie Catalog 3.4.0 * * www.antp.be/software/moviecatalog * * * * This program is free software; you can * * redistribute it and/or modify it under the * * terms of the GNU General Public License as * * published by the Free Software Foundation; * * either version 2 of the License, or (at your * * option) any later version. * ***************************************************)program Allocine_FR;const GrandeImage = 1; { 2: Prend la grande image 1: Prend l'affiche 0: Pas d'image } PlusdActeurs = False; { True: Prend la liste complète des acteurs False: Prend les noms des acteurs de la page principale } PlusdeScene = 1; { 2 : Prend la liste complète des scenes de tournage 1 : Prend les scenes de tournage de la page principale 0 : Ne prend pas les secrets de tournage } Note = 2; { 2 : Prend les notes dans le champs rating et dans le champs commentaire 1 : Prend les notes dans le champs rating avec une preference pour la note des spectateurs 0 : Ne prend pas les notes ni dans le champs commentaire ni dans le champs rating } ConfirmTitre = True; { True: Demande le titre avant de lancer le script False: Ne demande pas le titre avant de lancer le script }var MovieName, NomFilm, Adresse, AdressePlus, La_liste, LaGrandeImage : string; numPage, numPageG, grandeTaille, compteur : Integer;//------------------------------------------------------------------------------// TROUVE UNE SOUS-CHAINE DE CARACTERE DANS UNE CHAINE//------------------------------------------------------------------------------function FindLine(Pattern: string; List: TStringList; StartAt: Integer): Integer;var i: Integer;begin result := -1; if StartAt < 0 then StartAt := 0; for i := StartAt to List.Count-1 do if Pos(Pattern, List.GetString(i)) <> 0 then begin result := i; Break; end;end;//------------------------------------------------------------------------------// ANALYSE DE LA PAGE DE RECHERCHES//------------------------------------------------------------------------------procedure AnalyzePage(Address: string);var Page: TStringList; LineNr: Integer; Line: string; BeginPos, EndPos : Integer;begin Page := TStringList.Create; Page.Text := GetPage(Address); if pos('Pas de résultats',Page.Text) <> 0 then begin showmessage('Aucun film trouvé pour : '+NomFilm); exit; end; if pos('Recherche :', Page.Text) = 0 then begin Adresse := Address; AnalyzeMoviePage(); end else begin PickTreeClear; LineNr := FindLine('<h3><b>Films <h4>', Page, 0); if LineNr > -1 then begin EndPos := length(Page.Text); Line := copy(Page.Text,1,EndPos); BeginPos := Pos('<td colspan="2" valign="top">', Line); Delete(Line, 1, BeginPos); EndPos := length(Line); Line := copy(Line,1,EndPos); PickTreeAdd('Films trouvés pour ' + NomFilm + ' :', ''); AddMoviesTitles(Line); end; if compteur = 1 then begin compteur := 0; AnalyzeMoviePage(); exit; end else begin begin if PickTreeExec(Address) then begin Adresse := Address; if (Adresse = AdressePlus) then begin AnalyzePage(AdressePlus); end else begin AnalyzeMoviePage(); end; end; end; end; end; Page.Free;end;//------------------------------------------------------------------------------// ANALYSE DE LA PAGE DU FILM//------------------------------------------------------------------------------procedure AnalyzeMoviePage();var Line, Value, AdresseCasting, AdresseSecret, AdresseGalerie, aucun, Avertissement: string; LineNr, IntValue: Integer; BeginPos, EndPos, FinPos: Integer;begin//charge la page Line := GetPage(Adresse); Avertissement := '';// URL SetField(fieldURL, URLEncode(Adresse));//translated title BeginPos := pos('<title>', Line); delete(Line,1, BeginPos+6); EndPos := pos('</title>', Line); Value := copy(Line, 1, EndPos - 1); Value := AnsiUpFirstLetter(Value); Value := AnsiMixedCase(Value,' -'); SetField(fieldTranslatedTitle, Value);// Picture if (GrandeImage = 1) then begin BeginPos := pos('<td valign="top" style="padding:0 10 5 0">', Line); delete(Line,1, BeginPos); BeginPos := pos('width="100%"><img src=', Line); delete(Line,1, BeginPos+22); EndPos := pos('" border', Line); Value := copy(Line, 1, EndPos - 1); GetPicture(Value, False); end else if (GrandeImage = 2) then begin // Adresse Galerie de photo if pos('Toute la Galerie Photos', Line) > 0 then begin aucun := Adresse; delete(aucun,1,pos('.fr', aucun)+3); AdresseGalerie := 'http://www.allocine.fr/'+copy(aucun, 1, pos('/', aucun))+'galerie_gen_cfilm='; delete(aucun,1,pos('=', aucun)); AdresseGalerie := AdresseGalerie +aucun; grandeTaille := 0; numPageG := 1; galerieImage(AdresseGalerie); end else begin BeginPos := pos('<td valign="top" style="padding:0 10 5 0">', Line); delete(Line,1, BeginPos); BeginPos := pos('width="100%"><img src=', Line); delete(Line,1, BeginPos+22); EndPos := pos('" border', Line); Value := copy(Line, 1, EndPos - 1); GetPicture(Value, False); end; end;// Original Title BeginPos := pos('<h4>Titre original : ', Line); if BeginPos <> 0 then begin delete(Line,1, BeginPos+20); EndPos := pos('</h4>', Line); Value := copy(Line, 1, EndPos - 1); Value := AnsiUpFirstLetter(Value); Value := AnsiMixedCase(Value,' -'); HTMLRemoveTags(Value); SetField(fieldOriginalTitle, Value); end else begin SetField(fieldOriginalTitle, GetField(fieldTranslatedTitle)); end;//Country if pos('<h4>Film ', Line) > 0 then begin Delete(Line, 1, pos('<h4>Film ', Line) + 8); EndPos := pos('</h4>', Line); Value := copy(Line, 1, EndPos - 2); Value := AnsiUpFirstLetter(Value); Value := AnsiMixedCase(Value,' -'); SetField(fieldCountry, Value); end;// Category BeginPos := pos('<h4>Genre : ', Line); if (BeginPos > 0) then begin Delete(Line, 1, pos('<h4>Genre : ', Line) + 11); EndPos := pos('</h4>', Line); Value := copy(Line, 1, EndPos - 1); Value := AnsiUpFirstLetter(Value); SetField(fieldCategory, Value); end;// Length if pos('Durée : ', Line) > 0 then begin Delete(Line, 1, pos('Durée : ', Line) + 7); IntValue := StrToInt(copy(Line, 1, 1), 0) * 60; if pos('min.', Line) > 0 then begin delete(Line,1,pos('h', Line) + 1); Value := copy(Line, 1, pos('min.',Line)-1); Value := StringReplace(Value, ' ', ''); IntValue := IntValue + StrToInt(Value, 0); end; SetField(fieldLength, IntToStr(IntValue)); end;// Year if pos('<h4>Année de production : ', Line) > 0 then begin Delete(Line, 1, pos('<h4>Année de production : ', Line)+24); EndPos := pos('</h4>', Line); Value := copy(Line, 1, EndPos -1); SetField(fieldYear, Value); end;// Avertissement BeginPos := pos('Interdit', Line); if (BeginPos > 0) then begin Delete(Line, 1, BeginPos-1); EndPos := pos('</h4>', Line); Avertissement := copy(Line, 1, EndPos - 1)+#13#10#13#10; SetField(fieldComments, Trim(Avertissement)); end;// Actors if pos('<h4>Avec ', Line) > 0 then begin Delete(Line, 1, pos('<h4>Avec ', Line) + 8); EndPos := pos('</h4><br />', Line); Value := copy(Line, 1, EndPos - 1); HTMLRemoveTags(Value); HTMLDecode(Value); SetField(fieldActors, Trim(Value)); end;// Director if pos('<h4>Réalisé par ', Line) > 0 then begin Delete(Line, 1, pos('<h4>Réalisé par ', Line) + 15); EndPos := pos('</a></h4>', Line); Value := copy(Line, 1, EndPos - 1); HTMLRemoveTags(Value); HTMLDecode(Value); SetField(fieldDirector, Value); end;// Adresse casting complet if pos('Voir tout le casting', Line) > 0 then begin Delete(Line, 1, pos('<h4><a href=', Line) + 12); EndPos := pos('.html"', Line); AdresseCasting := 'http://www.allocine.fr'+copy(Line, 1, EndPos + 4); end;// Productor + More actors if (PlusdActeurs = True) then begin castingComplet(AdresseCasting); end;// Rating if (pos('<h4>Critiques :', Line) > 0) and (Note <> 0)then begin Delete(Line, 1, pos('<h4>Critiques :', Line) + 14); if pos('Presse', Line) > 0 then begin EndPos := pos('.gif', Line); Delete(Line, 1, EndPos-2); Value := copy(Line, 1, 1); Delete(Line, 1, EndPos+3); if Note = 2 then begin Avertissement := Avertissement + 'Note de la presse : ' + Value + '/4 '; end; if (Value = '0') then begin Value := '0'; end else if (Value = '1') then begin Value := '2'; end else if (Value = '2') then begin Value := '4'; end else if (Value = '3') then begin Value := '6'; end else if (Value = '4') then begin Value := '8'; end; SetField(fieldRating,Value); end; if pos('Spectateurs', Line) > 0 then begin EndPos := pos('.gif', Line); Delete(Line, 1, EndPos-2); Value := copy(Line, 1, 1); Delete(Line, 1, EndPos+3); if Note = 2 then begin Avertissement := Avertissement + 'Note des spectateurs : ' + Value + '/4'; end; if (Value = '0') then begin Value := '0'; end else if (Value = '1') then begin Value := '2'; end else if (Value = '2') then begin Value := '4'; end else if (Value = '3') then begin Value := '6'; end else if (Value = '4') then begin Value := '8'; end; SetField(fieldRating,Value); end; if Note = 2 then begin Avertissement := Avertissement + #13#10#13#10; SetField(fieldComments, Avertissement); end; end;// Description if pos('<h3><b>Synopsis', Line) > 0 then begin Delete(Line, 1, pos('<h3><b>Synopsis', Line)); Delete(Line, 1, pos('<h4>', Line) + 3); EndPos := pos('</h4>', Line); Value := copy(Line, 1, EndPos - 1); HTMLRemoveTags(Value); HTMLDecode(Value); SetField(fieldDescription, Trim(Value)); end;// Adresse tous les secrets de tournage if pos('Tous les secrets de tournage', Line) > 0 then begin aucun := Adresse; delete(aucun,1,pos('.fr', aucun)+3); AdresseSecret := 'http://www.allocine.fr/'+copy(aucun, 1, pos('/', aucun))+'anecdote_gen_cfilm='; delete(aucun,1,pos('=', aucun)); AdresseSecret := AdresseSecret +aucun; end;// Commments if (pos('<h3><b>Secrets de tournage', Line) > 0) and (PlusdeScene = 1) then begin Delete(Line, 1, pos('<h3><b>Secrets de tournage', Line)); Delete(Line, 1, pos('</table>', Line)+7); Value := Avertissement+'Secrets de tournage :'+#13#10#13#10; BeginPos := pos('<h4><b>', Line); FinPos := pos('</table>',Line); repeat Delete(Line, 1, BeginPos+6); EndPos := pos('</b></h4>', Line); Value := Value + Trim(copy(Line, 1, EndPos - 1))+' :'+#13#10; BeginPos := pos('<h4>', Line); Delete(Line, 1, BeginPos-1); FinPos := FinPos - BeginPos+1; EndPos := pos('</h4>', Line); Value := Value + Trim(copy(Line, 1, EndPos - 1))+#13#10#13#10; Delete(Line, 1, EndPos-1); FinPos := FinPos - EndPos+1; BeginPos := pos('<h4><b>', Line); delete(Line, 1, BeginPos-8); FinPos := FinPos - BeginPos+8; aucun := copy(Line, 1, 5); BeginPos := pos('<h4><b>', Line); until ((BeginPos = 0) or (aucun = 'link1') or (BeginPos > FinPos)); HTMLRemoveTags(Value); HTMLDecode(Value); SetField(fieldComments, Trim(Value)); end else if (pos('<h3><b>Secrets de tournage', Line) > 0) and (PlusdeScene = 2) then begin La_liste := Avertissement+'Secrets de tournage :'+#13#10#13#10; numPage := 1; secretComplet(AdresseSecret); end; DisplayResults;end;//------------------------------------------------------------------------------// ANALYSE DE LA PAGE CASTING//------------------------------------------------------------------------------procedure castingComplet(pageCasting: string);var Line, Role, Acteur, couple, liste, Producteur :string; BeginPos, EndPos : Integer;begin//pour eviter les time-out sleep(1500);//charge la page Line := GetPage(pageCasting); if (PlusdActeurs = True) then begin if Pos('<b>Acteur(s)</b>', Line) > 0 then begin//liste des acteurs BeginPos := Pos('<b>Acteur(s)</b>', Line); Delete(Line, 1, BeginPos); BeginPos := Pos('<h5>', Line); liste := ''; repeat// le role delete(Line,1,BeginPos-1); EndPos := Pos('</h5>', Line); Role := copy(Line,1,EndPos); HTMLRemoveTags(Role); delete(Line,1,EndPos);// le nom de l'acteur BeginPos := Pos('<h4><a href', Line); delete(Line,1,BeginPos+3); BeginPos := Pos('<h4>', Line); delete(Line,1,BeginPos-1); EndPos := Pos('</h4>', Line); Acteur := copy(Line,1,EndPos); HTMLRemoveTags(Acteur); delete(Line,1,EndPos);// couple acteur (rôle) couple := Acteur +' ('+Role+'), ';// ajout du couple dans la liste if (Role <> 'Scénariste') then begin liste := liste + couple;// pour un nouvel ajout BeginPos := Pos('<h5>', Line); end else begin BeginPos := 0; end; until (BeginPos = 0); EndPos := length(liste); liste := copy(liste,1,EndPos-2)+'.'; SetField(fieldActors, liste); end;// le producteur if Pos('<h5>Producteur', Line) > 0 then begin BeginPos := Pos('<h5>Producteur', Line); Delete(Line, 1, BeginPos); BeginPos := Pos('<h4><a href', Line); delete(Line,1,BeginPos+3); BeginPos := Pos('<h4>', Line); delete(Line,1,BeginPos+3); EndPos := Pos('</h4>', Line); Producteur := copy(Line,1,EndPos-1); SetField(fieldProducer, Producteur); end; end;end;//------------------------------------------------------------------------------// ANALYSE DE LA PAGE SECRETS DE TOURNAGE//------------------------------------------------------------------------------procedure secretComplet(pageSecret: string);var Line, LineSuivant, Titre, Texte, couple, pageSuivante :string; BeginPos, EndPos : Integer;begin//pour eviter les time-out sleep(1500);//charge la page Line := GetPage(pageSecret); LineSuivant := Line; numPage := numPage + 1; if Pos('Secrets de tournage</h2>', Line) > 0 then begin//liste des secrets BeginPos := Pos('Secrets de tournage</h2>', Line); Delete(Line, 1, BeginPos); BeginPos := Pos('<h4><b>', Line); repeat// le titre Delete(Line, 1, BeginPos+6); EndPos := pos('</b></h4>', Line); Titre := Trim(copy(Line, 1, EndPos - 1)); BeginPos := pos('<h4>', Line); HTMLRemoveTags(Titre);// le texte Delete(Line, 1, BeginPos-1); EndPos := pos('</h4>', Line); Texte := Trim(copy(Line, 1, EndPos - 1)); HTMLRemoveTags(Texte); Texte := StringReplace(Texte, #13#10, '');// le couple titre : texte couple := Titre+' :'+#13#10+Texte+#13#10#13#10; Delete(Line, 1, EndPos-1); if (Titre <> 'Toutes les offres spéciales') then begin// ajout du couple dans la liste La_liste := La_liste + couple;// pour un nouvel ajout BeginPos := pos('<h4><b>', Line); delete(Line, 1, BeginPos-8); BeginPos := pos('<h4><b>', Line); end else begin BeginPos := 0; end; until (BeginPos = 0); SetField(fieldComments, La_liste);// si on a plusieurs pages pageSuivante := pageSecret; delete(pageSuivante,1,pos('.fr', pageSuivante)+2); pageSuivante := copy(pageSuivante, 1, pos('.html', pageSuivante)-1); if pos('page',pageSuivante) = 0 then begin pageSuivante := pageSuivante+'&page='+IntToStr(numPage)+'.html'; end else begin pageSuivante := copy(pageSuivante, 1, pos('&page=', pageSuivante)-1)+'&page='+IntToStr(numPage)+'.html'; end; BeginPos := pos(pageSuivante,LineSuivant); if BeginPos <> 0 then begin pageSuivante := 'http://www.allocine.fr'+pageSuivante; secretComplet(pageSuivante); end; end;end;//------------------------------------------------------------------------------// ANALYSE DE LA PAGE GALERIE//------------------------------------------------------------------------------procedure galerieImage(pageGalerie: string);var Line, Value, LineSuivant, pageSuivante :string; BeginPos, EndPos, taille : Integer;begin//pour eviter les time-out sleep(1500);//charge la page Line := GetPage(pageGalerie); LineSuivant := Line; numPageG := numPageG + 1; BeginPos := pos('<td align="center" colspan="2">', Line); delete(Line,1, BeginPos); BeginPos := pos('<img src="', Line); delete(Line,1, BeginPos+9); EndPos := pos('" border', Line); Value := copy(Line, 1, EndPos - 1); delete(Line,1, EndPos); BeginPos := pos('alt="', Line); delete(Line,1, BeginPos+4); EndPos := pos('Ko"', Line); taille := StrToInt(Trim(copy(Line, 1, EndPos - 1)),0); if (taille > grandeTaille) then begin grandeTaille := taille; LaGrandeImage := Value; end;// si on a plusieurs pages pageSuivante := pageGalerie; delete(pageSuivante,1,pos('.fr', pageSuivante)+2); pageSuivante := copy(pageSuivante, 1, pos('.html', pageSuivante)-1); if pos('page',pageSuivante) = 0 then begin pageSuivante := pageSuivante+'&page='+IntToStr(numPageG)+'.html'; end else begin pageSuivante := copy(pageSuivante, 1, pos('&page=', pageSuivante)-1)+'&page='+IntToStr(numPageG)+'.html'; end; BeginPos := pos(pageSuivante,LineSuivant); if BeginPos <> 0 then begin pageSuivante := 'http://www.allocine.fr'+pageSuivante; galerieImage(pageSuivante); end; GetPicture(LaGrandeImage, False);end;//------------------------------------------------------------------------------// AJOUTE UN COUPLE FILM / ADRESSE A LA LISTE DE RESULTAT//------------------------------------------------------------------------------procedure AddMoviesTitles(var Line: string);var MovieTitle, MovieAddress, aucun: string; StartPos, EndPos : Integer;begin//compte les résultats compteur := 0; repeat StartPos := pos('<h4><a href=', Line); if StartPos > 0 then begin Delete(Line, 1, StartPos + 12); EndPos := pos('.html"', Line); MovieAddress := copy(Line, 1, EndPos+4); StartPos := pos('>', Line)+1; MovieTitle := copy(Line, StartPos, pos('</h4>', Line) - StartPos); MovieTitle := StringReplace(MovieTitle, ' ', ' '); HTMLRemoveTags(MovieTitle); delete(Line,1,pos('</h4>',Line)-1); aucun := copy(Line, 1, pos('</td>',Line)-1); aucun := StringReplace(aucun, ' ', ' '); aucun := StringReplace(aucun, #13#10, ''); aucun := StringReplace(aucun, ' ', ''); HTMLRemoveTags(aucun);// si on a des informations complémentaires if (aucun <> '') then begin MovieTitle := MovieTitle +' '+aucun; end; PickTreeAdd(MovieTitle, 'http://www.allocine.fr' + MovieAddress); adresse := 'http://www.allocine.fr' + MovieAddress; compteur := compteur+1; end; until (StartPos < 1);// si on a plus de résultats StartPos := pos('Films précédents',Line); if StartPos <> 0 then begin delete(Line,1,StartPos); if (pos('rub=1&page=',Line) > 0) then begin StartPos := pos('<h4><b><a href=', Line); if StartPos <> 0 then begin delete(Line,1,StartPos+15); EndPos := pos('" class=',Line); AdressePlus := 'http://www.allocine.fr' + copy(Line, 1, EndPos-1); PickTreeAdd('Plus de résultats',AdressePlus); end; end; end;end;//------------------------------------------------------------------------------// PROGRAMME PRINCIPAL//------------------------------------------------------------------------------begin if CheckVersion(3,4,0) then begin MovieName := GetField(fieldTranslatedTitle); if MovieName = '' then MovieName := GetField(fieldOriginalTitle); if (ConfirmTitre = True) then begin if Input('Allociné.fr by ScorEpioN', 'Entrez le titre du film :', MovieName) then begin if Pos('allocine.', MovieName) > 0 then begin adresse := MovieName; AnalyzeMoviePage(); end else begin//remplace les caractères accentués NomFilm := MovieName; AnalyzePage('http://www.allocine.fr/recherche/?motcle='+UrlEncode(MovieName)+'&rub=1'); end; end; end else begin AnalyzePage('http://www.allocine.fr/recherche/?motcle='+UrlEncode(MovieName)+'&rub=1'); end; end else ShowMessage('This script requires a newer version of Ant Movie Catalog (at least the version 3.4.0)');end.

je sais pourquoi Comme pour le script mycine, le site Allociné a été mis a jour donc malheureusement tu dois changer le script de allo ciné je vais faire une petite fiche d'explication pour ca.

selectionnes le menu "parametre" ensuite "metéo" et tu choisis la ville PAROS

Et bien regarde le programme SXT, tu vas pouvoir mettre a jour par Allociné tes fiches de films

Si tu as déjà installé une premiere fois SXT (pas la 1.1 mais une ancienne) il faut que tu recreé dans le programme une nouvelle XBOX afin que celui ci mette en cache toute l'arborescence de ta xbox. C'est une opération qui prend un peu de temps. Lis bien le manuel sur le debut tu comprendras. Bon courage

oui il est important de recreer une xbox, car il faut que la mise en place du cache s'effectue

tout le monde teste mais quelqu'un a t il eu des soucis ? pour ma part les videos HD ne marchent pas