input.asp

来自「Active Server Pages 网页制作教程看之前请传到ASP空间。或者」· ASP 代码 · 共 37 行

ASP
37
字号
<!-- #include virtual="/kjasp/func/DB.fun" -->
<%
If Request("Send") <> Empty Then
   UserID = Request( "UserID" )
   Password = Request( "Password" )

   SQL = "Select * From Users Where UserID='" & UserID & "'"
   SQL = SQL & " And Password = '" & Password & "'"
   Set rs = GetSecuredMdbRecordset( "UsersPwd.mdb", SQL, "kj6688" )
   
   If Not rs.EOF Then	' 找得到记录,表示通过
      Response.Write "通过!"
   Else
      Response.Write "用户名称或密码错误!"
   End If
   Response.End
End If
%>
<HTML>
<BODY BackGround="../B01.jpg">

<H2 ALIGN=CENTER>请输入用户帐号及密码:</H2>
<CENTER>
<FORM Action=Input.asp Method=POST>
<TABLE BORDER=1 CELLSPACING=0 >
   <TR><TD ALIGN=RIGHT>用户名称:</TD>
   <TD><Input Type=Text Name=UserID Size=12></TD></TR>

   <TR><TD ALIGN=RIGHT>密码:</TD>
   <TD><Input Type=Password Name=Password Size=12></TD></TR>
</TABLE><P>
<INPUT Type=Submit Name="Send" Value=" 确 定 ">
</FORM>
</CENTER>
</BODY>
</HTML>

⌨️ 快捷键说明

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