XObject.BaseUri Property gets the base URI for this XObject. : XObject « XML LINQ « VB.Net

1. VB.Net
2. XML LINQ
3. XObject

XObject.BaseUri Property gets the base URI for this XObject.

 

Imports System
Imports System.Xml
Imports System.Xml.Schema

Class MainClass

    Shared Sub Main()

        Dim po As XElement = XElement.Load("Order.xml", LoadOptions.SetBaseUri Or LoadOptions.SetLineInfo)
        Dim splitUri() As String = po.BaseUri.Split("/"c)
        Console.WriteLine("BaseUri: {0}", splitUri(splitUri.Length - 1))

        For Each e As XElement In po.DescendantsAndSelf()
            Console.WriteLine("{0}{1}{2}", _
                ("".PadRight(e.Ancestors().Count() * 2) & e.Name.ToString).PadRight(20), _
                DirectCast(e, IXmlLineInfo).LineNumber.ToString().PadRight(5), _
                DirectCast(e, IXmlLineInfo).LinePosition)
        Next
    End Sub

End Class

   
  

Related examples in the same category