login.asp

来自「集合了学习asp的100个实例」· ASP 代码 · 共 40 行

ASP
40
字号
<HTML>

<BODY>

<TITLE>

用户登录

</TITLE>

<%

if Request.Form.Count=0 then

%>

请输入用户名和密码

<FORM ACTION="login.asp" METHOD="post">

    <Table border=0>

    <tr><td>用户名:</td>

        <td><INPUT TYPE=text NAME=username VALUE=""></td>

    </tr>

    <tr><td>密码:</td>

        <td><INPUT TYPE=password NAME=password  VALUE=""></td>

    </tr>

    </Table>

    <INPUT TYPE=Submit VALUE=确认提交>

    <INPUT TYPE=reset VALUE=重新输入>

</FORM>



<%else%>

<%

Dim user

dim pwd

user=Request.Form("username")

pwd=Request.Form("password")



if user="fenfang" then

    if pwd="1234" then

        Response.write "用户登录成功"

    else 

        Response.write "用户密码无效"

    end if

else

    Response.write "用户无效"

end if

end if

%>

⌨️ 快捷键说明

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