listing0707.aspx

来自「asp入门到精通的源代码」· ASPX 代码 · 共 64 行

ASPX
64
字号
<%@ Page Language="VB" %>

<script runat="server">
   sub Submit(obj as object, e as eventargs)
      if Page.IsValid then
         lblMessage.Text = "It's all good!"
      end if
   end sub
   
   sub ValidateThis(obj as Object, args as _
   ServerValidateEventArgs)
   if len(args.Value) < 8 then
      args.IsValid = false
   else
      args.IsValid = true
   end if
end sub

</script>

<script language="JavaScript">
   function validateLength( oSrc, txtValue ){
      var retValue = true; // assume ok
      if(txtValue.length < 8){
         retValue = false;}
      return retValue
   }
</script>

<html><body>
   <form runat="server">
      <asp:Label id="lblMessage" runat="server" />
      <table>
      <tr>
         <td valign="top">Username:</td>
	     <td valign="top">
            <asp:Textbox id="tbUserName" runat="server" 
               /><br>
            <asp:CustomValidator runat="server"
               OnServerValidate="ValidateThis" 
               OnClientValiate="validateLength" 
               Display="Dynamic"
               ControlToValidate="tbUserName"
               ErrorMessage="The username must be 8 characters or longer"/>
	     </td>
	  </tr>
	  <tr>
         <td valign="top">Password:</td>
	     <td valign="top">
	        <asp:Textbox id="tbPassword" runat="server" 
	           TextMode="password" />
	     </td>
	  </tr>
	  <tr>
         <td align="right" colspan="2">
	        <ASP:Button id="tbSubmit" runat="server" 
	           OnClick="Submit" 
	           text="Submit" />
	     </td>
	  </tr>
      </table>   
   </form>
</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?