CustomValidator Sample

<html>
<head>
 
    <script language="VB" runat="server">

        Sub ValidateBtn_OnClick(sender As Object, e As EventArgs)
            If (Page.IsValid) Then
              lblOutput.Text = "页有效！"
           Else
              lblOutput.Text = "页无效！:-("
           End If
        End Sub

        Sub ServerValidate (sender As Object, value As ServerValidateEventArgs)
            Try
                Dim num As Int32 = Int32.Parse(value.Value)
                If num Mod 2 = 0 Then
                    value.IsValid = True
                    Exit Sub
                End If
            Catch exc As Exception
            End Try

            value.IsValid = False
        End Sub

   </script>

</head>
<body>

<h3><font face="宋体">CustomValidator 示例</font></h3>
<p>

<form runat="server">

    <asp:Label id=lblOutput runat="server" Text="输入一个偶数:" Font-Name="宋体" Font-Size="10.5pt" /><br>

    <p>

    <asp:TextBox id=Text1 runat="server" />

    <asp:RequiredFieldValidator id="RequiredFieldValidator1" runat="server"
        ControlToValidate="Text1"
        ErrorMessage="请输入一个数字"
        Display="Dynamic"
        Font-Name="verdana" Font-Size="10pt">
    </asp:RequiredFieldValidator>

    <asp:CustomValidator id="CustomValidator1" runat="server"
        ControlToValidate="Text1"
        ClientValidationFunction="ClientValidate"
        OnServerValidate="ServerValidate"
        Display="Static"
        Font-Name="verdana" Font-Size="10pt">
           不是偶数！
    </asp:CustomValidator>

    <p>

    <asp:Button text="验证" onclick="ValidateBtn_OnClick" runat="server" />

    <script language="javascript">

       function ClientValidate(source, arguments)
       {
          // 偶数？
          if (arguments.Value%2 == 0)
            arguments.IsValid = true;
          else
            arguments.IsValid = false;
       }

    </script>

</form>


</body>
</html>
posted @ 2006-06-02 15:13  蛤蟆  阅读(652)  评论(0)    收藏  举报