使用VB.net讀取XML

Question

我正在努力閱讀VB中的XML並獲取所需的數據。

<?xml version="1.0" encoding="UTF-8"?> 
    <Install>
        <Package>
            <Name>Office2010</Name>
            <Path>C:\Windows\Office</Path>
            <Default>0</Default>
        </Package>
        <Package>
            <Name>CCleaner</Name>
            <Path>C:\Windows\Cleaner</Path>
            <Default>0</Default>
        </Package>
    </Install>

我試圖一次讀取整個節點，所以我可以獲取它的所有值。

package.Name
package.Path
package.Default

這可能嗎？ 我正在為此努力2個多小時。 謝謝。

Answer 1

您可以使用簡單的For Each循環和XML文字，例如：

' or load the XML with XDocument.Load(...) '
Dim xml = <Install>
            <Package>
                <Name>Office2010</Name>
                <Path>C:\Windows\Office</Path>
                <Default>0</Default>
            </Package>
            <Package>
                <Name>CCleaner</Name>
                <Path>C:\Windows\Cleaner</Path>
                <Default>0</Default>
            </Package>
        </Install>

' If you used XDocument.Load(...), use xml.Root.<Package> instead '
For Each package In xml.<Package>
    Console.WriteLine(package.<Name>.Value)
    Console.WriteLine(package.<Path>.Value)
    Console.WriteLine(package.<Default>.Value)
Next

Answer 2

// parse your XML into an XDocument
Dim doc As XDocument = XDocument.Parse(xml)
// get "Install" element
Dim install As XElement = doc.Root

// iterate over "Package" elements in install
For Each package As XElement In install.Elements("Package")
    Dim name As String = package.Element("Name").Value
    Dim path As String = package.Element("Path").Value
    Dim def As String = package.Element("Default").Value
Next