Official Forum
https://forum.antp.be/phpbb3/
Ok, mais comme je ne tombais plus que sur des exemples utilisant , je me suis dit: de toute façon il faut une solution pour les 2 et exclure la partie qui varie dans le findInfo.antp wrote:C'est une espace insécable, code 160 dans le jeu de caractère Windows.
Tu pourrais faire ceci pour les remplacer par des espaces classiques :
s := StringReplace(s, Chr(160), ' ');
(où s est la variable qui contient la page complète téléchargée)
Ça marche oui, d'ailleurs l'option "Type de lancement -> 2 Demande L'ASIN" est inutile puisqu'avec l'option 0 tu peux tout aussi bien faire la recherche sur le titre, l'EAN ou L'ANSI. Par contre ces 2 références ne sont pas identiques.kurosu wrote:OK, j'avoue que ne le voyant pas sur la fiche produit, que ça marche *aussi* sur le numéro ASIN (d'où l'url de base) et finalement que je croyais ce numéro très local, m'avait donné l'impression que c'était juste un problème de nom. Après, il suffit de mettre "ASIN ou EAN", et ça sera bon.
Ça, Je peux essayer d'en faire une.kurosu wrote:Quand j'aurais compris comment on affiche une liste de choix de films (genre allociné), sans doute y remettrais-je les mains
Le charset de la page est effectivement sensée être en iso-8859-1 ... sauf qu'il y a plein de caractères encodés en UTF8kurosu wrote:J'ai testé aussi en copiant-collant la chaîne et avec TF8Decode/Encode (pas utile normalement vu que la page est sensée être en ISO8859-1x), et pareil. Mais comme y a des tags HTML pour lier aux fiches des individus, autant nettoyer et prendre la partie qu'on sait alors correct. Et comme les 2 formats (  et l'autre) sont présents, ça marche mieux aussi.
Comment as tu fait pour déterminer de quel caractère il s'agissait ?antp wrote:C'est une espace insécable, code 160 dans le jeu de caractère Windows.
Tu pourrais faire ceci pour les remplacer par des espaces classiques :
s := StringReplace(s, Chr(160), ' ');
(où s est la variable qui contient la page complète téléchargée)
Il me faudrait alors plutôt fusionner titre et EAN, car le numéro ASIN saute directement à la page sans recherche.Raoul_Volfoni wrote:Ça marche oui, d'ailleurs l'option "Type de lancement -> 2 Demande L'ASIN" est inutile puisqu'avec l'option 0 tu peux tout aussi bien faire la recherche sur le titre, l'EAN ou L'ANSI. Par contre ces 2 références ne sont pas identiques.
Cf. plus bas, j'ai fait une mise à jour que tu peux utiliser comme base.Ça, Je peux essayer d'en faire une.kurosu wrote:Quand j'aurais compris comment on affiche une liste de choix de films (genre allociné), sans doute y remettrais-je les mains
Je me suis retrouvé à éviter de faire des matchs avec des caractères problématiques, plus simple.Le charset de la page est effectivement sensée être en iso-8859-1 ... sauf qu'il y a plein de caractères encodés en UTF8
J'aurai personnellement sauvé le fichier et utiliser un éditeur hexadécimal.@ antp
Salut antp,
Comment as tu fait pour déterminer de quel caractère il s'agissait ?antp wrote:C'est une espace insécable, code 160 dans le jeu de caractère Windows.
Tu pourrais faire ceci pour les remplacer par des espaces classiques :
s := StringReplace(s, Chr(160), ' ');
(où s est la variable qui contient la page complète téléchargée)
Arf, je viens de voir que c'est présent sur la page de basekurosu wrote:regarde la page commentaires pour faire la moyenne des étoiles et la ramener sur 10.
Je suis reparti de ta première version, mais ça ne devrait rien changer, par rapport à ce que tu as rajouté.kurosu wrote:Cf. plus bas, j'ai fait une mise à jour que tu peux utiliser comme base.
J'avais fait ça aussi de mon côté, ça évite de chercher ce qu'on aurait pu oublier de gérerRaoul_Volfoni wrote:Dans les options, j'ai viré ce qui n'était plus utile car le code en rapport n'est plus présent dans le script: Mise à jour, Fichier Log.kurosu wrote:Cf. plus bas, j'ai fait une mise à jour que tu peux utiliser comme base.
L'intérêt (faible) du numéro ASIN est de construire immédiatement l'url sans passer par une page de recherche.J'ai fait le ménage dans l'option "Type de lancement" il n'y a plus que trois choix possible :
- 0 -> Demande le titre, code ANSI, Code EAN ou URL avant de lancer le script
- 1 -> Ne demande pas le titre avant de lancer le script
- 2 -> Lancement automatique sur l'adresse web
Le code à cet endroit était bizarre (dupliqué) et ne marchait pas chez moi.J'ai rajouté 3 nouvelles options:
1 - Nettoyer le titre : (Permet de nettoyer le titre pour ne garder que le titre et rien d'autre)
- 0 -> Non
- 1 -> Oui
Effectivement, j'ai juste rajouté une option pour le type d'image qu'on souhaite, mais le code est ptet pas très robuste.Je n'ai pas touché la partie concernant la récupération de l'image, parce que je vois pas trop comment faire pour récupérer au possible l'image HIres, tout en étant sûr que ce soit la jaquette recto.
Le code dont tu parles n'a rien avoir avec l'option Nettoyer le script.kurosu wrote:Le code à cet endroit était bizarre (dupliqué) et ne marchait pas chez moi.
J'ai remis 'recupTitreRecherche' (sans doute issu des utils de scorepion) et fait pour que ça marche chez moi.
Je ne sais pas pourquoi tu as changé les conditions de la boucle, mais chez moi ça ne marche pas du tout ... je crois que je vais rester avec ma V17 sur laquelle j'ai fais une modif sur la partie synopsis et rajouté un choix pour l'option "Casse Choisie"Le script Amazon (FR).ifs en V17.Raoul_Volfoni wrote:Mais le plus gênant c'est que je ne récupère plus aucunes réponses lorsque je fais une recherche par un titre ... à la place j'ai une belle liste vide !! oh well Je ne sais pas pourquoi tu as changé les conditions de la boucle, mais chez moi ça ne marche pas du tout ...
Code: Select all
// Synopsis
if CanSetField(fieldDescription) then
begin
if Pos('Synopsis</h3>', Line) > 0 then
begin
Synopsis := DecodeUTF(findInfo('Synopsis</h3>', '</div>', Line, '4'));
end else
begin
if Pos('>Voir l''ensemble des Descriptions du produit</a>', Line) > 0 then
begin
Line2 := findInfo('<div class="seeAll">', '>Voir l''ensemble des Descriptions du produit</a>', Line, '4');
Line2 := findInfo('<a href="', '"', Line2, '4');
Line2 := GetPage(Line2);
Line2 := findInfo('<h2>Descriptions du produit</h2>', '>Retourner à l''aperçu du produit</a>', Line2, '4');
Delete(Line2, Pos('<!--', Line2), (Pos('<![endif]-->', Line2)+12)-(Pos('<!--', Line2)));
Synopsis := DecodeUTF(findInfo('Synopsis</h3>', '</div>', Line2, '4'));
end;
end;
HTMLRemoveTags(Synopsis);
HTMLDecode(Synopsis);
MonSetField(fieldDescription, Fulltrim(Synopsis));
end; Bizarre ...kurosu wrote:Sinon, ton bloc de code 'dupliqué' me retournait une chaine vide au contraire de l'ancien code et comme toi avec le problème ci-dessus que tu as eu avec mon code, j'ai remis celui qui marchait pour moi.
... ça le faisait avec n'importe quel titre ? ou tu as un exemple particulier. Parce que chez moi, sur le peu de titres que j'ai testé, je n'avais pas ce problème.Code: Select all
MovieName := recupTitreRecherche(GetOption('Recherche sur le titre'));
MovieName := CleanTitle(CleanTitle2(MovieName));J'ai sauvé la page en local et ouvert le fichier avec un éditeur hexa.Raoul_Volfoni wrote: Comment as tu fait pour déterminer de quel caractère il s'agissait ?
Avec CanSetPicture (de mémoire) le script peut savoir si on a coché la case pour pouvoir remplacer l'image.kurosu wrote: @antp (hors-sujet, mais bon)
Pour les images, ne serait-il pas possible d'attendre la confirmation qu'on veut remplacer le champs en question avant de télécharger ladite image? Car si on annule pour une raison ou une autre, l'image a été téléchargée pour rien.
(et ça serait compliqué à modifier pour ne la télécharger que quand on est vraiment sûr d'en avoir besoin)