xml - 使用动态标签从 XML 中提取数据

Question

我正在编写一个简单的 VB.net 函数，它从 XML 文件中提取某个标签。功能是：

Public Function ExtractXMLValue(ByVal FilePath As String, ByVal XMLTag As String) As String        

    Dim XMLDocument = XDocument.Load(FilePath)
    Dim Output As String

    Output = XMLDocument.<XMLTag>.<ServerAddress>.Value
    Return Output
End Function

问题是输出为空，因为程序将 XMLTag 视为标记本身，而不是要解释的动态字符串。并且 XML 文件中没有名为“XMLTag”的标记。

我想调用我的函数，例如：ExtractXMLValue(FileName, "ServerAddress")

这是我的 XML 文件：

<?xml version="1.0" encoding="UTF-8"?>
<ConnectionSettings>
  <ServerAddress>192.0.0.1</ServerAddress>
  <ServerPort>30000</ServerPort>
</ConnectionSettings>

谢谢您的帮助。

Answer 1

试试这个。这将在您的 XML 文档中找到 XMLTag 的第一个实例并返回它的值。如果您有多个标签，它只返回第一个。如果你没有标签，那么它不会返回任何东西。

Output = XMLDocument.GetElementsByTagName(XMLTag)(0).InnerXml