我在中国素材网的论坛看到网友问怎么简单加密,具体实现可以这样写:
用asp,perl忘完了。
先写一个登陆表单。假设reg.asp
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<title>西路登陆页面</title>
</head>
<body>
<form action="pass.asp" method="post">
<table cellpadding=2 cellspacing=0 border=0>
<tr>
<td><font face="arial,helvetica" size="2"><b>username</b></font></td>
<td><input type="text" name="username" size="20"></td>
</tr>
<tr>
<td><font face="arial,helvetica" size="2"><b>password</b></font></td>
<td><input type="password" name="password" size="20"></td>
</tr>
<tr>
<td colspan="2"><input type="submit" value="log in"></td>
</tr>
</table>
</form>
<p><a href="1.asp">进入</a></p>
<p><span lang="en-us"><a href="signout.asp">loginout</a></span></p>
</body>
</html>
再来一个登陆验证 pass.asp
<%
option explicit
dim username, password
username = request.form("username")
password = request.form("password")
change the username and password values below change the login
if (username = "admin") and (password = "admin") then
response.cookies("loginadmin") = "true"
response.redirect("登陆成功.asp")
end if
response.redirect("login.asp")
%>
成功则进入登陆成功.asp页面
失败则返回login.asp
以下注销页面: loginout.asp
<%
response.cookies("loginadmin") = ""
response.redirect("login.asp")
%>
你也可以用数据库存储,当然是多用户时候了。简单的话这样就行了。
