xml - 无法插入以下 XML 节点 VB.net

Question

我想将以下 XML 文件附加到包含附加的<ID>Sam</ID>：

<INDEX>
  <ID>Billy</ID>
</INDEX>

但是我似乎无法让它工作我尝试过的是以下代码。

Dim NEWNAME as string="SAM"
Dim xmlIndex As XmlDocument = New XmlDocument()
xmlIndex.Load(Application.StartupPath & "\SYSTEM\MY_INDEX.xml")

With 
xmlDoc.SelectSingleNode("/INDEX").CreateNavigator().AppendChild()
.WriteStartElement("ID", NEWNAME)                                                                  
.WriteEndElement()
.Close()

xmlIndex.Save(Application.StartupPath & "\SYSTEM\MY_INDEX.xml")

End With

另请注意，为了这个问题的方便，我已声明NEWNAME为 equaling SAM，但这同样可以是 a TextBox.Text。

标签： xmlvb.netappendchild-nodes

Answer 1

我通常使用这样的东西来编写一个新的节点。

Dim NEWNAME As String = "SAM"
Dim xmlIndex As XmlDocument = New XmlDocument()
xmlIndex.Load("C:\Test.xml")

Dim root As XmlNode = xmlIndex.DocumentElement
Dim elem As XmlElement = xmlIndex.CreateElement("ID")
elem.InnerText = NEWNAME
root.AppendChild(elem)

xmlIndex.Save("C:\Test.xml")