'-----------------------------------------------------------------------
'  This file is part of the Microsoft .NET SDK Code Samples.
' 
'  Copyright (C) Microsoft Corporation.  All rights reserved.
' 
'This source code is intended only as a supplement to Microsoft
'Development Tools and/or on-line documentation.  See these other
'materials for detailed information regarding Microsoft code samples.
' 
'THIS CODE AND INFORMATION ARE PROVIDED AS IS WITHOUT WARRANTY OF ANY
'KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
'IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A
'PARTICULAR PURPOSE.
'-----------------------------------------------------------------------
Imports System
Imports System.IO
Imports System.Xml

Public Class ReadXmlStreamSample

    Shared Sub Main()

        Console.WriteLine("Using StringReader ...")

        Using stream As StringReader = New StringReader("<?xml version='1.0'?>" + _
            "<!-- This file represents a fragment of a book store inventory database -->" + _
            "<bookstore>" + _
            " <book genre=""autobiography"" publicationdate=""1981"" ISBN=""1-861003-11-0"">" + _
            "   <title>The Autobiography of Benjamin Franklin</title>" + "   <author>" + _
            "       <first-name>Benjamin</first-name>" + "       <last-name>Franklin</last-name>" + _
            "   </author>" + "   <price>8.99</price>" + " </book>" + _
            " <book genre=""novel"" publicationdate=""1967"" ISBN=""0-201-63361-2"">" + _
            "   <title>The Confidence Man</title>" + "   <author>" + _
            "       <first-name>Herman</first-name>" + _
            "       <last-name>Melville</last-name>" + "   </author>" + _
            "   <price>11.99</price>" + " </book>" + _
            "  <book genre=""philosophy"" publicationdate=""1991"" ISBN=""1-861001-57-6"">" + _
            "   <title>The Gorgias</title>" + "   <author>" + _
            "       <name>Plato</name>" + "   </author>" + "   <price>9.99</price>" + _
            " </book>" + "</bookstore>")

            'Create XmlReader and load reader from stream
            Using reader As XmlReader = XmlReader.Create(stream)
                'Output reader to console
                Using writer As XmlWriter = XmlWriter.Create(Console.Out)
                    writer.WriteNode(reader, True)
                End Using
            End Using
        End Using

        Console.WriteLine()
        Console.WriteLine("Processing of stream complete.")
        Console.WriteLine()
        Console.WriteLine("Press Enter to Exit")
        Console.ReadLine()
    End Sub
End Class