Problème avec Delphi-XML

Bonjour,
Je suis en Delphi 7 et je commence à programmer pour faire un Fichier XML
Le code Delphi ne plante pas, il m'enregistre bien le fichier XML mais lorsque je le lance avec IE il y a un message d'erreur qui m'indique que le fichier ne peut pas etre affiché et ansuite :

Attribut dupliqué. Erreur de traitement de la ressource file:///C:/Users/Raguin/Desktop/Copie de DAE.xml. Ligne 2, Positio...

<DFRCD801A xmlns="http://gamma.douane.finances.gouv.fr/dfr/dfr801" xmlns="http://fr.gouv.finances.douane.gamma/types">

Je vous mets le code Delphi que j'éxécute :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

procedure TFicheAcquit.GAMMA1Click(Sender: TObject); var Body, SubmittedDraftOfEaad, Circulation : IXMLNode; begin memo1.Clear; XMLdoc.Version := '1.0'; XMLdoc.Encoding := 'ISO-8859-1'; XMLdoc.StandAlone:= 'yes'; XMLDoc.DocumentElement := XMLDoc.CreateElement('DFRCD801 A','http://gamma.douane.finances.gouv.fr/dfr/dfr801" xmlns="http://fr.gouv.finances.douane.gamma/types'); Body := XMLDoc.DocumentElement.AddChild('Body'); SubmittedDraftOfEaad := Body.AddChild('SubmittedDraftOfEaad'); Circulation := SubmittedDraftOfEaad.AddChild('Circulation'); Circulation.Attributes['TypeCirc1'] := 'N'; memo1.Lines.Assign(XMLDoc.XML); XMLDoc.SaveToFile('C:\Users\raguin\Desktop\Copie de DAE.xml'); end;

---

Merci d'avance

- le nom de la première balise est incorrect (caractère espace).
- dans le namespace (pour le CreateElement) ,tu essaie d'ajouter un deuxième namespace (xmlns)

Normalement, tu as un erreur d'exécution pour la première erreur.
Pour la seconde c'est à l'ouverture du fichier XML.

En corrigeant ces deux problèmes, cela fonctionne.

Si tjrs pas résolu, il serait bien aussi de nous montrer le fichier XML résultat que tu essaies de lire sans succès.

bonjour,
j'ai avancé sur mon fichier XML mais il me reste plus qu'une petite chose a faire.

il faut que j'obtienne

Code:

---

1 2 3 4 5 6

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?> - <ie:DFRCD815A xmlns:tms="http://emcs.dgtaxud.ec/v10/tms" xmlns:fr="http://fr.gouv.finances.douane.gamma/types" xmlns:ie="http://gamma.douane.finances.gouv.fr/dfr/dfr815" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> - <ie:Body> ......... ........

---

Mais voila, je sais pas faire, voici ce que j'ai fait en delphi

Code:

---

1 2 3 4 5 6

XMLdoc.Version := '1.0'; XMLdoc.Encoding := 'UTF-8'; XMLdoc.StandAlone:= 'yes'; XMLDoc.DocumentElement := XMLDoc.CreateElement('ie:CD815A','http://emcs.dgtaxud.ec/v10/tms'); Body := XMLDoc.DocumentElement.AddChild('Body');

---

Mon souci est dans le xmldoc.DocumenElement:= XMLDoc.CreateElement('ie:CD815A','http://emcs.dgtaxud.ec/v10/tms') ou il manque des informations

Merci de m'avancer sur le sujet.

cordialement

Au pire tu peux utiliser, ce n'est pas très propre, mais fonctionnel

Code:

---

1 2	XMLDoc.DocumentElement.SetAttribute("xmlns:fr","http://fr.gouv.finances.douane.gamma/types");

---

je comprends pas ce que tu veux que je fasse !!!!

Syntaxiquement, les namespaces s'écrivent comme les attributs (ou presque), donc je te propose d'utiliser une méthode pour les attributs pour affecter un namespace.

Code:

---

1 2 3 4 5

XMLDoc.DocumentElement.SetAttribute('xmlns:fr','http://fr.gouv.finances.douane.gamma/types'); XMLDoc.DocumentElement.SetAttribute('xmlns:tms','http://emcs.dgtaxud.ec/v10/tms'); XMLDoc.DocumentElement.SetAttribute('xmlns:ie','http://gamma.douane.finances.gouv.fr/dfr/dfr815'); XMLDoc.DocumentElement.SetAttribute('xmlns:xsi',''http://www.w3.org/2001/XMLSchema-instance');

---

Merci ca marche :ccool:

je donne juste la syntaxe complète :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

XMLdoc.Version := '1.0'; XMLdoc.Encoding := 'UTF-8'; XMLdoc.StandAlone:= 'yes';   XMLDoc.DocumentElement := XMLDoc.CreateElement('ie:CD815A','');   XMLDoc.DocumentElement.SetAttribute('xmlns:fr','http://fr.gouv.finances.douane.gamma/types'); XMLDoc.DocumentElement.SetAttribute('xmlns:tms','http://emcs.dgtaxud.ec/v10/tms'); XMLDoc.DocumentElement.SetAttribute('xmlns:ie','http://gamma.douane.finances.gouv.fr/dfr/dfr815'); XMLDoc.DocumentElement.SetAttribute('xmlns:xsi','http://www.w3.org/2001/XMLSchema-instance');   Body := XMLDoc.DocumentElement.AddChild('Body'); .......... ..........

---