[XML][DOM][VB] Le noeud à insérer provient d'un contexte de document différent

Bonjour à tous,

Je me permets de vous poser cette question concernant une exception qui va finir par me rendre fou. 8O La voici : "Le noeud à insérer provient d'un contexte de document différent." 1 seule réponse de Google à ce problème et la personne dit l'avoir résolu en utilisant des XMLElement, qui chez moi posent problème aussi.

Cette fonction toute basique copie un noeud d'un document XML A vers un document XML B vierge.

La structure de données :

Code:

---

1 2 3 4 5 6 7 8

<root> <node1> <subNode1/> <subNode2/> <subNode3/> </node1> <node2/> </root>

---

Et maintenant la fonction posant problème :

Code:

---

1 2 3 4 5 6 7

[...] Dim SourceDocument, CibleDocument As New XMLDocument() SourceRapport.Load(FileNameSource) CibleDocument.LoadXML("<?xml version=""1.0"" encoding=""UTF-8""?><root></root>") Dim node As XmlNode = SourceRapport.Item("root").Item("node1").CloneNode(True) CibleDocument.Item("root").AppendChild(node) 'Exception ici CibleDocument.Save(FileNameCible)

---

Donc voilà, je suis un peu coincé car j'ai également essayé en utilisant InsertAfter, etc... :x

Merci de votre aide,
NS.

Bonjour,

pour copier un noeud d'une instance de Document à une autre, il faut impérativement utiliser la méthode importNode().

Merci de votre réponse rapide.

Le fichier XML "source" :

Code:

---

1 2 3 4 5 6 7 8 9

<?xml version="1.0" encoding="UTF-8"?> <root> <node1> <subNode1>Test1</subNode1> <subNode2>Test2</subNode2> <subNode3>Test3</subNode3> </node1> <node2>OK</node2> </root>

---

La fonction modifiée :

Code:

---

1 2 3 4 5

Dim SourceDocument, CibleDocument As New XmlDocument() SourceRapport.Load(FileNameSource) CibleDocument.LoadXml("<?xml version=""1.0"" encoding=""UTF-8""?><root></root>") CibleDocument.ImportNode(SourceRapport.Item("root").Item("node1"), True) ' Plus d'exception ici CibleDocument.Save(FileNameDestination)

---

Et enfin le fichier XML de sortie :'(

Code:

---

1 2 3

<?xml version="1.0" encoding="UTF-8"?> <root> </root>

---

Visiblement il a purement et simplement ignoré ma commande (sachant qu'il n'y a pas eu cette fois d'exception levée).

ImportNode() est une méthode spécifique de la classe héritée XMLDocument, comment puis-je alors positionner mes noeuds à importer à un emplacement précis de ma structure de données ? :roll:

Cordialement,
NS

Citation:

---

Envoyé par NiKKiLLeR

ImportNode() est une méthode spécifique de la classe héritée XMLDocument, comment puis-je alors positionner mes noeuds à importer à un emplacement précis de ma structure de données ? :roll:

---

importNode() ne fait qu'importer le noeud dans le contexte du document cible, il faut un appendChild() pour le positionner dans son arborescence. Ca donne un truc du genre (désolé pour les éventuelles erreurs de syntaxe, mon VB est rouillé depuis des années, mais le principe est là) :

Code:

---

1 2 3 4

Dim NoeudImporte As XmlNode ... Set NoeudImporte = CibleDocument.ImportNode(SourceRapport.Item("root").Item("node1"), True) CibleDocument.documentElement.appendChild(NoeudImporte)

---

Impeccable... ca marche... Il fallait le savoir :p

Un grand merci, et bonne continuation à vous !