将 linq 查询的结果保存到 XML 文件

Question

这是原始的 xml 文件

<?xml version="1.0" encoding="utf-8"?>
<configuration>
    <setup>
        <cap>33</cap>
    </setup>
    <setup>
        <cap>dd</cap>
    </setup>
</configuration>

在下面的示例中，我删除了 cap 等于 33 的节点

Dim Cap As integer = 33
Dim query = From q In XElement.Load(Environment.CurrentDirectory & "\sample.xml").Elements("setup") _
            Where q.Value = Cap _
            Select q
For Each q In query
    If Cap = q.Element("cap").Value Then q.Remove()
Next

现在如何将查询结果写回 .xml 文件？喜欢...

<?xml version="1.0" encoding="utf-8"?>
<configuration>
    <setup>
        <cap>dd</cap>
    </setup>
</configuration>

Answer 1

好吧，您可以使用数据创建一个新的 XDocument。 （C# 语法，但很容易转换...）

XDocument doc = new XDocument(new XElement("configuration", query));
doc.Save(file);

Answer 2

使用 XPath 怎么样：

Imports System.Xml.XPath

Module Module1

    Sub Main()
        Dim doc = XDocument.Load("foo.xml")
        doc.XPathSelectElements("//setup/cap[text() = 'dd']/..").Remove()
        Console.WriteLine(doc)
    End Sub

End Module