Discussion :

[NiKKiLLeR]

Bonjour à tous,

Je me permets de vous poser cette question concernant une exception qui va finir par me rendre fou. 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 :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
<root>
    <node1>
         <subNode1/>
         <subNode2/>
         <subNode3/>
    </node1>
    <node2/>
</root>

Et maintenant la fonction posant problème :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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...

Merci de votre aide,
NS.

[GrandFather]

Bonjour,

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

[NiKKiLLeR]

Merci de votre réponse rapide.

Le fichier XML "source" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ?

Cordialement,
NS

[GrandFather]

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 ?

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 vb :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[NiKKiLLeR]

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

Un grand merci, et bonne continuation à vous !