Write or append the Element to XML file using XmlDocument

[yxq]

I want to add some elements to a XML file using XmlDocument, how to do?
thank you very much.
The original XML file like:
////////////////////////////////////////////////////////
<?xml version="1.0" encoding="utf-8" ?>
<AAA>
<BBB>
<CCC>
<resource name="111">Cont ent1</resource>
<resource name="222">Cont ent2</resource>
</CCC>
</BBB>
</AAA>
///////////////////////////////////////////////////////

After added elements(the "DDD" elements), it sould like:
////////////////////////////////////////////////////
<?xml version="1.0" encoding="utf-8" ?>
<AAA>
<BBB>
<CCC>
<resource name="111">Cont ent1</resource>
<resource name="222">Cont ent2</resource>
</CCC>

<DDD>
<resource name="333">Cont ent3</resource>
<resource name="444">Cont ent4</resource>
</DDD>

</BBB>
</AAA>
////////////////////////////////////////////////////

[Martin Honnen]

yxq wrote:

I want to add some elements to a XML file using XmlDocument, how to do?
thank you very much.
The original XML file like:
////////////////////////////////////////////////////////
<?xml version="1.0" encoding="utf-8" ?>
<AAA>
<BBB>
<CCC>
<resource name="111">Cont ent1</resource>
<resource name="222">Cont ent2</resource>
</CCC>
</BBB>
</AAA>
///////////////////////////////////////////////////////

After added elements(the "DDD" elements), it sould like:
////////////////////////////////////////////////////
<?xml version="1.0" encoding="utf-8" ?>
<AAA>
<BBB>
<CCC>
<resource name="111">Cont ent1</resource>
<resource name="222">Cont ent2</resource>
</CCC>

<DDD>
<resource name="333">Cont ent3</resource>
<resource name="444">Cont ent4</resource>
</DDD>

</BBB>
</AAA>

Load the original XML document into a System.Xml.XmlD ocument, create and
insert the new elements and save the XmlDocument back e.g.

Dim doc As New XmlDocument()
doc.Load("..\.. \XMLFile1.xml")

Dim ddd As XmlElement = doc.CreateEleme nt("DDD")

Dim resource As XmlElement = doc.CreateEleme nt("resource")
resource.SetAtt ribute("name", "333")
resource.InnerT ext = "Content3"
ddd.AppendChild (resource)

resource = doc.CreateEleme nt("resource")
resource.SetAtt ribute("name", "444")
resource.InnerT ext = "Content4"
ddd.AppendChild (resource)

doc.DocumentEle ment("BBB").App endChild(ddd)

'Save to Console for testing, could of course save to file
doc.Save(Consol e.Out)

--

Martin Honnen --- MVP XML
http://JavaScript.FAQTs.com/

[yxq]

Thank you very much, you are a expert.

"Martin Honnen" <ma*******@yaho o.de>
??????:eh****** *******@TK2MSFT NGP06.phx.gbl.. .

yxq wrote:

>I want to add some elements to a XML file using XmlDocument, how to do?
thank you very much.
The original XML file like:
////////////////////////////////////////////////////////
<?xml version="1.0" encoding="utf-8" ?>
<AAA>
<BBB>
<CCC>
<resource name="111">Cont ent1</resource>
<resource name="222">Cont ent2</resource>
</CCC>
</BBB>
</AAA>
///////////////////////////////////////////////////////

After added elements(the "DDD" elements), it sould like:
////////////////////////////////////////////////////
<?xml version="1.0" encoding="utf-8" ?>
<AAA>
<BBB>
<CCC>
<resource name="111">Cont ent1</resource>
<resource name="222">Cont ent2</resource>
</CCC>

<DDD>
<resource name="333">Cont ent3</resource>
<resource name="444">Cont ent4</resource>
</DDD>

</BBB>
</AAA>

Load the original XML document into a System.Xml.XmlD ocument, create and
insert the new elements and save the XmlDocument back e.g.

Dim doc As New XmlDocument()
doc.Load("..\.. \XMLFile1.xml")

Dim ddd As XmlElement = doc.CreateEleme nt("DDD")

Dim resource As XmlElement = doc.CreateEleme nt("resource")
resource.SetAtt ribute("name", "333")
resource.InnerT ext = "Content3"
ddd.AppendChild (resource)

resource = doc.CreateEleme nt("resource")
resource.SetAtt ribute("name", "444")
resource.InnerT ext = "Content4"
ddd.AppendChild (resource)

doc.DocumentEle ment("BBB").App endChild(ddd)

'Save to Console for testing, could of course save to file
doc.Save(Consol e.Out)

--

Martin Honnen --- MVP XML
http://JavaScript.FAQTs.com/