CustomValidator pavyzdys su VB ASP.NET

Užduotis: jeigu CheckBox pažymėtas varnele, privaloma užpildyti dar du laukus: tbInfo ir tbInfo2


                             
ID="cvMeet" runat="server"
ErrorMessage="Privalomas"
OnServerValidate="cvMeet_ServerValidate"
ValidateEmptyText="True"
ClientValidationFunction="validateTaxiOrderForm" ForeColor="Red">


JavaScript:

function validateTaxiOrderForm ( source, args) {
            if ($("#cbMeet").val() == "checked"
                && $("#tbInfo").val() == ""
               && $.trim($("#tbInfo2").val()) == "") {

                args.IsValid = false;
            } else {
                args.IsValid = true;
                window.returnValue = true;
            };

        };

VB:
Protected Sub cvMeet_ServerValidate(source As Object, args As ServerValidateEventArgs) Handles cvMeet.ServerValidate
        If cbMeet.Checked = True Then
            Validate("meet")
            If Not IsValid Then
                Return
            End If
        End If
    End Sub

Client-side valdidavimą galima išjungti su savybe EnableClientScript=false