动感首页更新实现之七 ------ 密码验证篇

领测软件测试网 下面的程序是阿喔动感管理通用程序，非常简单不用解释了吧！
if username="admin" and password="admin" then
请记得修改两个admin分别用户名和密码！

login.asp
<html>

<head>
<title>管理者登陆</title>
<link rel="stylesheet" href="DOWNLOAD.CSS">
</head>

<body>
<div align="center"><center>

<table border="0" cellspacing="1" width="90%">
<tr>
<td>　<form method="post" action="chklogin.asp">
<table width="45%" border="1" cellspacing="0" cellpadding="1" align="center"
bordercolordark="#ecf5ff" bordercolorlight="#6699cc">
<tr>
<td><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td width="33%" align="right" height="30">用户名：</td>
<td width="67%"><input name="username" maxlength="20" class="smallInput" size="20"> </td>
</tr>
<tr>
<td width="33%" align="right" height="30">密 码：</td>
<td width="67%"><input type="password" name="password" maxlength="16" class="smallInput"
size="20"> </td>
</tr>
<tr>
<td colspan="2" height="15"></td>
</tr>
</table>
</td>
</tr>
<tr align="center">
<td height="40">
<input type="submit" name="Submit" value="确定" class="buttonface">
&nbsp;
<input type="reset" name="Submit2" value="重写" class="buttonface">
</td>
</tr>
</table>
</form>
<p align="center">　</td>
</tr>
</table>
</center></div>
</body>
</html>


__________________________________________________________________

chklogin.asp
<%
dim sql
dim rs
dim seekerrs
dim founduser
dim username
dim companyid
dim password
dim errmsg
dim founderr
founderr=false
FoundUser=false
username=request.form("username")
password=request.Form("password")
if username="" then
response.redirect "index.asp"
end if
if password="" then
response.redirect "index.asp"
end if

if username="admin" and password="admin" then
response.cookies("adminok")=true
response.redirect "manage.asp"
else
response.redirect "index.asp"
end if
%>


作者：阿喔 出处：<ASP动感在线> http://asp.on.net.cn/

(待续)

文章来源于领测软件测试网 https://www.ltesting.net/