login.aspx

来自「Visual Basic.NET应用编程150例」· ASPX 代码 · 共 46 行

ASPX
46 行
字号 
<%@ Import Namespace="System.Web.Security " %>
<html>
  <script language="VB" runat=server>
    Sub Login_Click(Src As Object, E As EventArgs)
        If UserEmail.Value = "jdoe@somewhere.com"  _
					And UserPass.Value = "password"
            FormsAuthentication.RedirectFromLoginPage( _
					UserEmail.Value, false)
        Else
            Msg.Text = "Invalid Credentials: Please try again"
        End If
    End Sub
  </script>
  <body>
    <form runat=server ID="Form1">
      <h3><font face="Verdana">Login Page</font></h3>
      <table>
        <tr>
          <td>Email:</td>
          <td><input id="UserEmail" type="text" 
					 runat=server NAME="UserEmail"/></td>
          <td><ASP:RequiredFieldValidator ControlToValidate="UserEmail" 
										  Display="Static" 
										  ErrorMessage="*" 
										  runat=server 
										  ID="Requiredfieldvalidator1"/>
		  </td>
        </tr>
        <tr>
          <td>Password:</td>
          <td><input id="UserPass" type=password 
					 runat=server NAME="UserPass"/></td>
          <td><ASP:RequiredFieldValidator ControlToValidate="UserPass" 
										  Display="Static" 
										  ErrorMessage="*" 
										  runat=server 
										  ID="Requiredfieldvalidator2"/>
		  </td>
        </tr>
      </table>
      <asp:button text="Login" OnClick="Login_Click" runat=server ID="Button1"/>
      <p></p>
      <asp:Label id="Msg" ForeColor="red" Font-Name="Verdana" runat=server />
    </form>
  </body>
</html>

login.aspx - 源码说明

本页面展示了「Visual Basic.NET应用编程150例」中的 login.aspx 源码文件，采用 ASPX 编程语言编写，共 46 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Visual相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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