' Create a resolver with default credentials.
        Dim resolver As XmlUrlResolver = New XmlUrlResolver()
        resolver.Credentials = System.Net.CredentialCache.DefaultCredentials

        ' Set the reader settings object to use the resolver.
        Dim settings6 As New XmlReaderSettings()
        settings6.XmlResolver = resolver

        ' Create the XmlReader object.
        Dim reader6 As XmlReader = XmlReader.Create("D:\books5.xml", settings6)
        ' Файл 'D:\books5.xml' не найден. Файл 'D:\books5.xml' не найден.