<%@ Page Language=VB Debug=true %><%@ Import Namespace="System.Data" %>ValidationSummary Control Sample Page ID="vsAllErros" DisplayMode="BulletList" ShowMessageBox="False" ShowSummary="True" runat="server" HeaderText="For these reasons, your data could not be processed:" Font-Name="Comic Sans MS" Font-Size="12"/> id="lblMessage" runat="server" Font-Bold="True" Text="Date"/> id="txtDateField" Columns="25" MaxLength="30" runat=server /> id="cvDateField" ControlToValidate="txtDateField" Operator="DataTypeCheck" Type="Date" ErrorMessage="You must enter a date!" Display="Dynamic" Font-Size="10pt" runat="server"> * id="lblMessage2" runat="server" Font-Bold="True" Text="Number"/> id="txtNumber" Columns="25" MaxLength="30" runat=server /> id="cvNumber" ControlToValidate="txtNumber" Operator="DataTypeCheck" Type="Integer" ErrorMessage="You must enter a whole number!" Display="Dynamic" runat="server"> * id="lblMessage3" runat="server" Font-Bold="True" Text="Make the same"/> id="txtSame1" Columns="25" MaxLength="30" runat=server /> id="txtSame2" Columns="25" MaxLength="30" runat=server /> ControlToValidate="txtSame1" ControlToCompare="txtSame2" ErrorMessage="Fields don't match!" Display="Dynamic" Font-Name="Tahoma" Font-Size="10pt" runat=server> * id="butOK" text="OK" Type="Submit" runat="server"/>