How to search and delete elements from a XML file?

[richardkreidl]

I want to be able to delete and search for elements in a XML file, I'm
using the code below for adding elements which works great:

Public Sub cmdAddElement_C lick(ByVal sender As System.Object, ByVal e
As System.EventArg s) Handles cmdAddElement.C lick

Dim doc As New XmlDocument
doc.Load("c:UMZ .xml")

Dim root As XmlNode = doc.DocumentEle ment
Dim EleName As XmlElement = doc.CreateEleme nt("Name")
Dim ElePreMVS As XmlElement = doc.CreateEleme nt("PreMVS")
Dim ElePostMVS As XmlElement = doc.CreateEleme nt("PostMVS")
Dim ElePreCS As XmlElement = doc.CreateEleme nt("PreCS")
Dim ElePostCS As XmlElement = doc.CreateEleme nt("PostCS")
Dim EleMisc As XmlElement = doc.CreateEleme nt("Misc")

EleName.InnerTe xt = txtName.Text
ElePreMVS.Inner Text = txtPreMVS.Text
ElePostMVS.Inne rText = txtPostMVS.Text
ElePreCS.InnerT ext = txtPreCS.Text
ElePostCS.Inner Text = txtPostCS.Text
EleMisc.InnerTe xt = txtMisc.Text

root.AppendChil d(EleName)
root.AppendChil d(ElePreMVS)
root.AppendChil d(ElePostMVS)
root.AppendChil d(ElePreCS)
root.AppendChil d(ElePostCS)
root.AppendChil d(EleMisc)

doc.Save("c:UMZ .xml")
End Sub

So, basically the XML file could dynamically grow or shrink with
elements as they're added or deleted.
Here is the XML file with one element row:

<?xml version="1.0" standalone="yes "?>
<UMZ>
<Name>some text</Name>
<PreMVS>some text</PreMVS>
<PostMVS>some text</PostMVS>
<PreCS>some text</PreCS>
<PostCS>some text</PostCS>
<Misc>some text</Misc>
</UMZ>

Here is a blank XML file without any rows:
<?xml version="1.0" standalone="yes "?>
<UMZ>
</UMZ>

Here is the XML file with two element rows:

<?xml version="1.0" standalone="yes "?>
<UMZ>
<Name>some text</Name>
<PreMVS>some text</PreMVS>
<PostMVS>some text</PostMVS>
<PreCS>some text</PreCS>
<PostCS>some text</PostCS>
<Misc>some text</Misc>
<Name>some more text</Name>
<PreMVS>some more text</PreMVS>
<PostMVS>some more text</PostMVS>
<PreCS>some more text</PreCS>
<PostCS>some more text</PostCS>
<Misc>some more text</Misc>
</UMZ>
Then I would need another button that would search for a 'Name' of a
element in the XML file that I would specify and populate the
cooresponding textboxes. Then I could delete the element from the XML
if so desired with a delete button.

[Cor Ligthert]

Richard,

Why are you not using the dataset. Your XML file is as far as I see
structured in the same way? That will save you a lot of coding.

Cor

[Jay B. Harlow [MVP - Outlook]]

Richard,
I would recommend you change your Schema to define each group of elements as
children of a single element, this way each "record" is an element with
child attributes or elements.

Something like:

| <?xml version="1.0" standalone="yes "?>
| <UMZ>
<Record>
| <Name>some text</Name>
| <PreMVS>some text</PreMVS>
| <PostMVS>some text</PostMVS>
| <PreCS>some text</PreCS>
| <PostCS>some text</PostCS>
| <Misc>some text</Misc>
</Record>
<Record>
| <Name>some more text</Name>
| <PreMVS>some more text</PreMVS>
| <PostMVS>some more text</PostMVS>
| <PreCS>some more text</PreCS>
| <PostCS>some more text</PostCS>
| <Misc>some more text</Misc>
</Record>
| </UMZ>

Then you can use XmlNode.SelectS ingleNode to select a "record", and
XmlNode.RemoveC hild to remove one of the "records".

Something like:

Dim doc As New XmlDocument
doc.Load("UMZ.x ml")

Dim node As XmlNode = doc.SelectSingl eNode("/UMZ/Record[Name='some
text']")
node.ParentNode .RemoveChild(no de)

doc.Save("UMZ.x ml")

"/UMZ/Record[Name='some text']" is an XPath statement that says find the
Record element of the UMZ element in the root, that has a Name element with
the text "some text". If you wanted to find the "some more text" record you
would use: "/UMZ/Record[Name='some more text']"

Note: instead of "Record" for this new containing element name, I would
probably pick something more appropriate to the domain model I am
abstracting...

Hope this helps
Jay

<ri***********@ northwesternmut ual.com> wrote in message
news:11******** *************@f 14g2000cwb.goog legroups.com...
|I want to be able to delete and search for elements in a XML file, I'm
| using the code below for adding elements which works great:
|
| Public Sub cmdAddElement_C lick(ByVal sender As System.Object, ByVal e
| As System.EventArg s) Handles cmdAddElement.C lick
|
| Dim doc As New XmlDocument
| doc.Load("c:UMZ .xml")
|
| Dim root As XmlNode = doc.DocumentEle ment
| Dim EleName As XmlElement = doc.CreateEleme nt("Name")
| Dim ElePreMVS As XmlElement = doc.CreateEleme nt("PreMVS")
| Dim ElePostMVS As XmlElement = doc.CreateEleme nt("PostMVS")
| Dim ElePreCS As XmlElement = doc.CreateEleme nt("PreCS")
| Dim ElePostCS As XmlElement = doc.CreateEleme nt("PostCS")
| Dim EleMisc As XmlElement = doc.CreateEleme nt("Misc")
|
| EleName.InnerTe xt = txtName.Text
| ElePreMVS.Inner Text = txtPreMVS.Text
| ElePostMVS.Inne rText = txtPostMVS.Text
| ElePreCS.InnerT ext = txtPreCS.Text
| ElePostCS.Inner Text = txtPostCS.Text
| EleMisc.InnerTe xt = txtMisc.Text
|
| root.AppendChil d(EleName)
| root.AppendChil d(ElePreMVS)
| root.AppendChil d(ElePostMVS)
| root.AppendChil d(ElePreCS)
| root.AppendChil d(ElePostCS)
| root.AppendChil d(EleMisc)
|
| doc.Save("c:UMZ .xml")
| End Sub
|
| So, basically the XML file could dynamically grow or shrink with
| elements as they're added or deleted.
| Here is the XML file with one element row:
|
| <?xml version="1.0" standalone="yes "?>
| <UMZ>
| <Name>some text</Name>
| <PreMVS>some text</PreMVS>
| <PostMVS>some text</PostMVS>
| <PreCS>some text</PreCS>
| <PostCS>some text</PostCS>
| <Misc>some text</Misc>
| </UMZ>
|
| Here is a blank XML file without any rows:
| <?xml version="1.0" standalone="yes "?>
| <UMZ>
| </UMZ>
|
| Here is the XML file with two element rows:
|
| <?xml version="1.0" standalone="yes "?>
| <UMZ>
| <Name>some text</Name>
| <PreMVS>some text</PreMVS>
| <PostMVS>some text</PostMVS>
| <PreCS>some text</PreCS>
| <PostCS>some text</PostCS>
| <Misc>some text</Misc>
| <Name>some more text</Name>
| <PreMVS>some more text</PreMVS>
| <PostMVS>some more text</PostMVS>
| <PreCS>some more text</PreCS>
| <PostCS>some more text</PostCS>
| <Misc>some more text</Misc>
| </UMZ>
|
|
| Then I would need another button that would search for a 'Name' of a
| element in the XML file that I would specify and populate the
| cooresponding textboxes. Then I could delete the element from the XML
| if so desired with a delete button.
|