Bonjour,
Voici un exemple de fichier :
Je voudrais lire mon fichier XML, voici mon code :<?xml version="1.0" encoding="ISO-8859-1" ?>
- <GSurf>
<Utilisateur>prenom.nom</Utilisateur>
<Machine>SERVICE-XXX</Machine>
<IP>XX.X.X.XXX</IP>
- <Historique>
<Visite id="14" horaire="13/03/2007 08:26:06" url="http://java.sun.com/update/1.5.0/map-1.5.0.xml" />
<Visite id="15" horaire="13/03/2007 08:26:07" url="http://javadl-esd.sun.com/update/1.5.0/map-1.5.0.xml" />
<Visite id="16" horaire="13/03/2007 08:26:07" url="http://javadl-esd.sun.com/update/1.5.0/1.5.0_10-b03.xml" />
<Visite id="17" horaire="13/03/2007 08:26:08" url="http://jal.sun.com/webapps/installstat/CountryLookup" />
</Historique>
</GSurf>
J'ai un plantage au niveau de la lecture :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 XML := TXMLDocument.Create(Self); XML.Active := true; XML.Version := '1.0'; XML.Encoding := 'ISO-8859-1'; XML.LoadFromFile(OpenDialog1.FileName); with XML.ChildNodes.Nodes['GSurf'].ChildNodes do begin Utilisateur := Nodes['Utilisateur'].Text; Machine := Nodes['Machine'].Text; IP := Nodes['IP'].Text; with Nodes['Historique'].ChildNodes do begin Horaire := Nodes['Visite'].Attributes['Horaire']; Url := Nodes['Visite'].Attributes['Url']; end; end; XML.Active := false; XML.Free;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Horaire := Nodes['Visite'].Attributes['Horaire'];Je comprends pas pourquoi j'ai cette erreur...11:42:15 -> Impossible de convertir le variant de type (Null) en type (String)
Avez-vous une idée ?
Merci,
ZiP
Partager