How to insert a node at a specific location in XML Doc

[mike]

Hello.

Let's say I have the following XML document:

<ROOT><Element1 >Some Text</Element1></ROOT>

I want to add a new element after Element1. I tried the following but,
naturally, it doesn't work:

Dim oElem as XmlElement
Dim oNode as XmlNode
Dim oRoot as XmlNode
Dim oDoc as New XmlDocument

oDoc.LoadXML("< ROOT><Element1> Some Text</Element1></ROOT>")

oRoot = oDoc.DocumentEl ement
oNode = oRoot.SelectSin gleNode("//ROOT/Element1")

oElem = oDoc.CreateElem ent("InsertMe")
oElem.InnerText = "A New Element"
oRoot.InsertBef ore(oElem, oNode) <----- This is the error

The error I get is: "The reference node is not a child of this node."

How do I go about inserting the new element at a specific point?

Thanks in advance,

Mike

[mike]

I meant to say "I want to add a new element "before" Element1.

"mike" <mi***@slomins. com> wrote in message
news:uQ******** ******@tk2msftn gp13.phx.gbl...

Hello.

Let's say I have the following XML document:

<ROOT><Element1 >Some Text</Element1></ROOT>

I want to add a new element after Element1. I tried the following but,
naturally, it doesn't work:

Dim oElem as XmlElement
Dim oNode as XmlNode
Dim oRoot as XmlNode
Dim oDoc as New XmlDocument

oDoc.LoadXML("< ROOT><Element1> Some Text</Element1></ROOT>")

oRoot = oDoc.DocumentEl ement
oNode = oRoot.SelectSin gleNode("//ROOT/Element1")

oElem = oDoc.CreateElem ent("InsertMe")
oElem.InnerText = "A New Element"
oRoot.InsertBef ore(oElem, oNode) <----- This is the error

The error I get is: "The reference node is not a child of this node."

How do I go about inserting the new element at a specific point?

Thanks in advance,

Mike

[Gomolyako Eduard]

mike пи�ал(а):

I meant to say "I want to add a new element "before" Element1.

"mike" <mi***@slomins. com> wrote in message
news:uQ******** ******@tk2msftn gp13.phx.gbl...

Hello.

Let's say I have the following XML document:

<ROOT><Element1 >Some Text</Element1></ROOT>

I want to add a new element after Element1. I tried the following but,
naturally, it doesn't work:

Dim oElem as XmlElement
Dim oNode as XmlNode
Dim oRoot as XmlNode
Dim oDoc as New XmlDocument

oDoc.LoadXML("< ROOT><Element1> Some Text</Element1></ROOT>")

oRoot = oDoc.DocumentEl ement
oNode = oRoot.SelectSin gleNode("//ROOT/Element1")

oElem = oDoc.CreateElem ent("InsertMe")
oElem.InnerText = "A New Element"
oRoot.InsertBef ore(oElem, oNode) <----- This is the error

The error I get is: "The reference node is not a child of this node."

How do I go about inserting the new element at a specific point?

Thanks in advance,

Mike

MSDN Library - XmlNode class InsertBefore method example:

Option Strict
Option Explicit

Imports System
Imports System.IO
Imports System.Xml

Public Class Sample

Public Shared Sub Main()

Dim doc As New XmlDocument()
doc.LoadXml("<b ook genre='novel' ISBN='1-861001-57-5'>" & _
"<title>Pri de And Prejudice</title>" & _
"</book>")

Dim root As XmlNode = doc.DocumentEle ment

'Create a new node.
Dim elem As XmlElement = doc.CreateEleme nt("price")
elem.InnerText = "19.95"

'Add the node to the document.
root.InsertBefo re(elem, root.FirstChild )

Console.WriteLi ne("Display the modified XML...")
doc.Save(Consol e.Out)
End Sub 'Main
End Class 'Sample

I hope this helps you.

Best, Ed.

[mike]

Hi, Ed. Thanks for the response.

I saw that example but I can't use the FirstChild property because, as the
XML doc grows (and it will grow), FirstChild may not be the place where I
want to insert an element.

I need to be able to insert an element anywhere in a document.

Any other suggestions?

Thanks again,

Mike

"Gomolyako Eduard" <ed************ **@gmail.com> wrote in message
news:11******** **************@ z14g2000cwz.goo glegroups.com.. .

mike ?????(?):

I meant to say "I want to add a new element "before" Element1.

"mike" <mi***@slomins. com> wrote in message
news:uQ******** ******@tk2msftn gp13.phx.gbl...

Hello.

Let's say I have the following XML document:

<ROOT><Element1 >Some Text</Element1></ROOT>

I want to add a new element after Element1. I tried the following but,
naturally, it doesn't work:

Dim oElem as XmlElement
Dim oNode as XmlNode
Dim oRoot as XmlNode
Dim oDoc as New XmlDocument

oDoc.LoadXML("< ROOT><Element1> Some Text</Element1></ROOT>")

oRoot = oDoc.DocumentEl ement
oNode = oRoot.SelectSin gleNode("//ROOT/Element1")

oElem = oDoc.CreateElem ent("InsertMe")
oElem.InnerText = "A New Element"
oRoot.InsertBef ore(oElem, oNode) <----- This is the error

The error I get is: "The reference node is not a child of this node."

How do I go about inserting the new element at a specific point?

Thanks in advance,

Mike

MSDN Library - XmlNode class InsertBefore method example:

Option Strict
Option Explicit

Imports System
Imports System.IO
Imports System.Xml

Public Class Sample

Public Shared Sub Main()

Dim doc As New XmlDocument()
doc.LoadXml("<b ook genre='novel' ISBN='1-861001-57-5'>" & _
"<title>Pri de And Prejudice</title>" & _
"</book>")

Dim root As XmlNode = doc.DocumentEle ment

'Create a new node.
Dim elem As XmlElement = doc.CreateEleme nt("price")
elem.InnerText = "19.95"

'Add the node to the document.
root.InsertBefo re(elem, root.FirstChild )

Console.WriteLi ne("Display the modified XML...")
doc.Save(Consol e.Out)
End Sub 'Main
End Class 'Sample

I hope this helps you.

Best, Ed.

[mike]

I figured it out:

oNode.ParentNod e.InsertBefore( oElem, oNode)

"mike" <mi***@slomins. com> wrote in message
news:%2******** ********@TK2MSF TNGP09.phx.gbl. ..

Hi, Ed. Thanks for the response.

I saw that example but I can't use the FirstChild property because, as the
XML doc grows (and it will grow), FirstChild may not be the place where I
want to insert an element.

I need to be able to insert an element anywhere in a document.

Any other suggestions?

Thanks again,

Mike

"Gomolyako Eduard" <ed************ **@gmail.com> wrote in message
news:11******** **************@ z14g2000cwz.goo glegroups.com.. .

mike ?????(?):

I meant to say "I want to add a new element "before" Element1.

"mike" <mi***@slomins. com> wrote in message
news:uQ******** ******@tk2msftn gp13.phx.gbl...

> Hello.
>
> Let's say I have the following XML document:
>
> <ROOT><Element1 >Some Text</Element1></ROOT>
>
> I want to add a new element after Element1. I tried the following but,
> naturally, it doesn't work:
>
> Dim oElem as XmlElement
> Dim oNode as XmlNode
> Dim oRoot as XmlNode
> Dim oDoc as New XmlDocument
>
> oDoc.LoadXML("< ROOT><Element1> Some Text</Element1></ROOT>")
>
> oRoot = oDoc.DocumentEl ement
> oNode = oRoot.SelectSin gleNode("//ROOT/Element1")
>
> oElem = oDoc.CreateElem ent("InsertMe")
> oElem.InnerText = "A New Element"
> oRoot.InsertBef ore(oElem, oNode) <----- This is the error
>
> The error I get is: "The reference node is not a child of this node."
>
> How do I go about inserting the new element at a specific point?
>
> Thanks in advance,
>
> Mike
>
>

MSDN Library - XmlNode class InsertBefore method example:

Option Strict
Option Explicit

Imports System
Imports System.IO
Imports System.Xml

Public Class Sample

Public Shared Sub Main()

Dim doc As New XmlDocument()
doc.LoadXml("<b ook genre='novel' ISBN='1-861001-57-5'>" & _
"<title>Pri de And Prejudice</title>" & _
"</book>")

Dim root As XmlNode = doc.DocumentEle ment

'Create a new node.
Dim elem As XmlElement = doc.CreateEleme nt("price")
elem.InnerText = "19.95"

'Add the node to the document.
root.InsertBefo re(elem, root.FirstChild )

Console.WriteLi ne("Display the modified XML...")
doc.Save(Consol e.Out)
End Sub 'Main
End Class 'Sample

I hope this helps you.

Best, Ed.