Question

我一直在努力摆脱这个xml的宽度和高度：

<?xml version="1.0" encoding="utf-8"?>
<Collection MaxLevel="7" TileSize="256" Format="png" NextItemId="1" ServerFormat="Default" xmlns="http://schemas.microsoft.com/deepzoom/2009">
  <Items>
    <I Id="0" N="0" Source="157_images/16.XML">
      <Size Width="1200" Height="900" />
      <Viewport Width="1" X="0" Y="0" />
    </I>
  </Items>
</Collection>

但这是不可能的，xml本身看起来不像我使用的其他xml文件我到目前为止的代码是：

    path = "157.xml"
    Dim document = XDocument.Load(Server.MapPath(path))
    Dim Xml As String = document.ToString
    Dim myallelements As XElement = XElement.Parse(Xml)

Answer 1

这种笨拙的语法包含默认命名空间：

 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Dim path As String = "C:\test\157.xml"
    Dim n As XmlNode
    Dim xm As New XmlDocument

    Dim nsmgr As New XmlNamespaceManager(xm.NameTable)
    nsmgr.AddNamespace("q", "http://schemas.microsoft.com/deepzoom/2009")

    xm.Load(path)
    n = xm.SelectSingleNode("/q:Collection/q:Items/q:I/q:Size", nsmgr)

    Debug.Print("width = " & n.Attributes("Width").Value & "  height = " & n.Attributes("Height").Value)

End Sub

Answer 2

 Dim size = myallelements...<Collection>...<Items>...<I>...<Size>
 Dim width = size.@Width.Value
 Dim Height = size.@Height

如何解析这个xml的属性？

2 个答案: