Dim xDoc As XDocument = XDocument.Load(sFile)
 
        Dim gpoNS As XNamespace = XNamespace.Get( _
          "http://www.microsoft.com/GroupPolicy/Settings")
        Dim identNS As XNamespace = XNamespace.Get( _
        "http://www.microsoft.com/GroupPolicy/Types")
 
        Dim ident = xDoc.Element(XName.Get("GPO", gpoNS.NamespaceName)). _
                        Element(XName.Get("Identifier", gpoNS.NamespaceName)). _
                        Element(XName.Get("Identifier", identNS.NamespaceName))
        Debug.WriteLine(ident.Value)