Mega Code Archive

 
Categories / VB.Net / XML
 

Validate XML document with Validation Error Handler

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 xtr As New XmlTextReader("book.xml")         Dim xvr As New XmlValidatingReader(xtr)         xvr.ValidationType = ValidationType.Schema         AddHandler xvr.ValidationEventHandler, _                    New ValidationEventHandler(AddressOf ValidationErrorHandler)         While xvr.Read()             If TypeOf xvr.SchemaType Is XmlSchemaComplexType Then                 Console.WriteLine("{0} - {1}", xvr.NodeType, xvr.Name)                 While xvr.MoveToNextAttribute()                     Console.WriteLine("  {0} - {1}: {2}", _                                         xvr.NodeType, xvr.Name, xvr.Value)                 End While             End If         End While     End Sub     Shared Sub ValidationErrorHandler(ByVal sender As Object, _                                ByVal args As ValidationEventArgs)         Console.WriteLine("XML Document Validation Failure")         Console.WriteLine()         Console.WriteLine("The ValidatingReader Failed with severity : {0}", _                                                                 args.Severity)         Console.WriteLine("The failure message was: {0}", args.Message)     End Sub End Class '<?xml version = "1.0"?> '<books xmlns = "x-schema:book.xdr"> '   <book> '      <title>C# How to Program</title> '   </book> '   <book> '      <title>Java How to Program, 4/e</title> '   </book> '   <book> '      <title>Visual Basic .NET How to Program</title> '   </book> '   <book> '      <title>Advanced Java 2 Platform How to Program</title> '   </book> '   <book> '      <title>Python How to Program</title> '   </book> '</books>