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]

Re: Write or append the Element to XML file using XmlDocument

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]

Re: Write or append the Element to XML file using XmlDocument

Thank you very much, you are a expert.

"Martin Honnen" <mahotrash@yaho o.de>
??????:eh2mWVyR JHA.588@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/

>