Wpf ErrorProvider - Integrating IDataErrorInfo, WPF, and the Validation Application Block (VAB)

Namespace Common.Entities.Net35
	Public Class BusinessObjectBase(Of T As BusinessObjectBase(Of T))
		Inherits Rahul.Common.Entities.BusinessObjectBase(Of T)

		''<remarks>
		'' Copyright (c) 2008, Rahul Singla (See License.txt)
		'' </remarks>
		Protected Overrides Function validateProperty(ByVal propertyName As String, ByVal ruleSet As String, ByVal validationSpecificationSource As Microsoft.Practices.EnterpriseLibrary.Validation.ValidationSpecificationSource, ByVal types() As System.Type, ByVal index() As Object) As Microsoft.Practices.EnterpriseLibrary.Validation.ValidationResults
			Dim rule As New EnterpriseValidationRule
			rule.SourceTypeName = Me.GetType().AssemblyQualifiedName
			rule.PropertyName = propertyName

			rule.RulesetName = ruleSet
			rule.ValidationSpecificationSource = validationSpecificationSource

			Return (rule.Validate(Me.GetType.GetProperty(propertyName, types).GetValue(Me, index)))
		End Function
	End Class
End Namespace