Gyakran szükség lehet rá, hogy mielőtt nekimennénk egy XML dokumentum betöltésének, azért jó lenne megnézni, hogy egyáltalán megfelel-e formailag annak a sémának, ami szerint majd betöltjük.
Egy gyors példakód:
Private Sub XSDvalidalas()
Dim rs As XmlReaderSettings = New XmlReaderSettings()
rs.ValidationType = ValidationType.Schema
rs.Schemas.Add("http://valami.xsd", xsd_doksi)
AddHandler rs.ValidationEventHandler, AddressOf HandleValidationError
Dim r As XmlReader = XmlReader.Create(xml_doksi, rs)
Using (r)
While (r.Read())
If (r.SchemaInfo Is Nothing) Then
validalasihibak = validalasihibak & vbCrLf & " hiányzó schema információ"
End If
End While
End Using
End Sub
Sub HandleValidationError(ByVal sender As Object, ByVal e As ValidationEventArgs)
validalasihibak = validalasihibak & vbCrLf & e.Severity.ToString() + ": " + e.Message
End Sub
A "validalasihibak" változóban megkapjuk a hibákat. Ha üres, akkor nem volt hiba.