2-18.aspx

来自「asp做的新闻系统」· ASPX 代码 · 共 29 行

ASPX
29
字号
<Html>
<Form Runat="Server">
  帐号: <Input Type="Text" Id="Text1" Runat="Server"><br>
  密码: <Input Type="Password" Id="Text2" Runat="Server"><br>
  <Input Type="Button" Id="Button1" Runat="Server" 
    OnServerClick="Button1_Click" Value="测试">
  <Input Type="Submit" Id="Submit1" Runat="Server"
    OnServerClick="Submit1_Click" Value="确定">
  <Input Type="Reset" Runat="Server" Value="重置">
</Form>

<Script Language="VB" Runat="Server">
  Sub Button1_Click(Sender As Object, e As EventArgs)
    IDPWDchk()
  End Sub
  Sub Submit1_Click(Sender As Object, e As EventArgs)
    IDPWDchk()
  End Sub
  Sub IDPWDchk()
    If Text1.Value="Asp" And Text2.Value="dotnet" Then
      Response.Write("通过验证! 你好!")
    Else
      Response.Write("帐号或密码错误, 请重新输入!")
      Text1.Value=""
      Text2.Value=""
    End If
  End Sub
</Script>
</Html>

⌨️ 快捷键说明

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