日期:2014-01-11  浏览次数:20975 次

请输入用户名和密码
用户名:密码:

源码:

<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="1234" size="20"></td>
</tr>
<tr><td>密码:</td>
<td><INPUT TYPE=password NAME=password VALUE="1234" size="20"></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="1234" then
if pwd="1234" then
Response.write "用户登录成功"
else
Response.write "用户密码无效"
end if
else
Response.write "用户无效"
end if
end if
%>

    由于下吧学习频道浏览页面为html页面,因此无法演示正常的asp代码效果。上面给出的演示,为代码通过iis解释后的一种情况。用户可以通过代码复制,自行测试效果。