Mega Code Archive

 
Categories / VB.Net / XML
 

Validating a Document using the Validate Method

Imports System Imports System.Xml Imports System.Xml.Schema Imports System.Xml.XPath   Class ValidateExample     Shared Sub Main(ByVal args() As String)         Dim document As XmlDocument = New XmlDocument()         document.Load("Books.xml")         Dim navigator As XPathNavigator = document.CreateNavigator()         document.Schemas.Add("http://www.yourname.com/books", "Books.xsd")         Dim validation As ValidationEventHandler = New ValidationEventHandler(AddressOf SchemaValidationHandler)         document.Validate(validation)     End Sub     Shared Sub SchemaValidationHandler(ByVal sender As Object, ByVal e As ValidationEventArgs)         Select Case e.Severity             Case XmlSeverityType.Error                 Console.WriteLine("Schema Validation Error: {0}", e.Message)                 Exit Sub             Case XmlSeverityType.Warning                 Console.WriteLine("Schema Validation Warning: {0}", e.Message)                 Exit Sub         End Select     End Sub End Class