Lecture flux RSS - enclosure
Bonjour j'ai un flux RSS je j'analyse pour extraire les infos.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| <?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:dc="http://purl.org/dc/elements/1.1/" version="2.0">
<channel>
<title>Nouveautés Éditeurs</title>
<link>http://nouveautes-editeurs.bnf.fr</link>
<description>Nouveautés Éditeurs, annonces des livres à paraître ou récemment parus</description>
<item>
<title>Aptes, le guide pratique du quotidien : Mieux vivre le handicap du tremblement essentiel</title>
<link>http://nouveautes-editeurs.bnf.fr/annonces.html?id_declaration=10000000078222&titre_livre=Aptes, le guide pratique du quotidien</link>
<description><p>Auteur : Barcq Fabrice </p><p>Editeur : Association des personnes concernées par le tremblement essentiel</p><p>Date de parution : 11/09/2012</p></description>
<enclosure url="http://nouveautes-editeurs.bnf.fr:80/image.html?app=NE&declaration=10000000078222&couverture=1" length="154149" type="image/jpeg" />
<pubDate>Sun, 16 Sep 2012 22:00:00 GMT</pubDate>
<guid>http://nouveautes-editeurs.bnf.fr/annonces.html?id_declaration=10000000078222&titre_livre=Aptes, le guide pratique du quotidien</guid>
<dc:date>2012-09-16T22:00:00Z</dc:date>
</item> |
Pas de problème pour extraire les noeuds title, link, description, etc mais je n'arrive pas à extraire l'URL après l'élément enclosure.
voici mon code
Code:
1 2 3 4 5 6 7 8 9 10 11 12
| StartItemNode := XMLDoc.DocumentElement.ChildNodes.First.ChildNodes.FindNode('item');
ANode := StartItemNode;
longueur := anode.AttributeNodes.Count;
repeat
STitle := ANode.ChildNodes['title'].Text;
sDescription := ANode.ChildNodes['description'].Text;
sEnclosure := ANode.ChildNodes['enclosure'].Text;
// suite du traitement
ANode := ANode.NextSibling;
ligne := ligne + 1;
until ANode = nil; |