Mega Code Archive

 

Categories / VB.Net / XML

 

Load Xml document and print attributes

Imports System Imports System.Xml Imports System.Xml.Schema Imports System.IO Imports System.Drawing Imports System.Drawing.Drawing2D Imports System.Collections Imports System.Data Imports System.Windows.Forms Public Class MainClass          Shared Sub Main()         Dim Doc As New XmlDocument()         Dim TempNode As XmlElement         Dim x As Integer                          Doc.Load("OutDocument.xml")         Dim DocRoot As XmlElement = Doc.CreateElement("Orders")         For x = 0 To DocRoot.ChildNodes.Count - 1             TempNode = CType(DocRoot.ChildNodes(x), XmlElement)             Console.WriteLine("Order Quantity: {0}", _                  TempNode.GetAttribute("Quantity"))         Next     End Sub End Class