Replace XMLNode

[Philip Wagenaar]

I have an XML file that will contain the data of a binary file in MIME
encoding. My application receiver the XML file with the location of the
binary file:

<REQUEST>
<IMPORT>
<DOCUMENT>
<FIELD>
<DATA>c:\myfile.dat</DATA>
</FIELD>
</DOCUMENT>
</IMPORT>
<REQUEST>

I have created code that replaces the DATA node with a new node. But the
problem is that the node does not contain the name <DATA>, it's empty:
<![CDATA[ mime data ]]>. That should be in between <DATA></DATA>.

Part of my code:

Dim xmld As XmlDocument
Dim nodelist As XmlNodeList
Dim node As XmlNode
xmld = New XmlDocument
xmld.Load(CmdArgs(1))
nodelist =
xmld.SelectNodes("/REQUEST/IMPORT/DOCUMENT/FIELD")
If node.Attributes.GetNamedItem("CODE").Value = "BASE64" Then
Dim Filename As String =
node.Item("DATA").InnerText()
If File.Exists(Filename) Then

Dim newElem As XmlNode
newElem =
xmld.CreateNode(XmlNodeType.CDATA, "DATA", "")
newElem.InnerText = "nieuwe data"

node.ReplaceChild(newElem,
node.Item("DATA"))
xmld.Save(CmdArgs(2))
End if

What is going wrong that I loose the <DATA></DATA>? I create a new node with
newElem = xmld.CreateNode(XmlNodeType.CDATA, "DATA", "")....