：783940、729220
技术中心
如何用ASP实现页面加密
作者：shnxn 网站：凡人网络
我在中国素材网的论坛看到网友问怎么简单加密，具体实现可以这样写：
用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("hahahahahha.asp")
end if
Response.Redirect("login.asp")
%>
成功则进入hahahaha.asp页面
失败则返回login.asp
以下注销页面： loginout.asp
<%
Response.Cookies("loginadmin") = ""
Response.Redirect("login.asp")
%>
你也可以用数据库存储，当然多用户时候多。简单就这样就行了哈。
转载请注明出自：凡人网络VenShop.Com
发现内容有误 / 侵犯您的版权
↑相关文章：
用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("hahahahahha.asp")
end if
Response.Redirect("login.asp")
%>
成功则进入hahahaha.asp页面
失败则返回login.asp
以下注销页面： loginout.asp
<%
Response.Cookies("loginadmin") = ""
Response.Redirect("login.asp")
%>
你也可以用数据库存储，当然多用户时候多。简单就这样就行了哈。
转载请注明出自：凡人网络VenShop.Com
关于我们 | 汇款方式 | 建站流程 | 联系方法 | 常见问题 | 新闻公告 | 加入收藏 | 留言本站
客服热线:022-85194902 邮箱:fuwu@venshop.com
®天津盈商科技有限公司版权所有 Powered By :TianJin YingShang KeJi Co.,Ltd.
软件著作权证书登记号:2006SRBJ0621 软著登字第BJ4429号
津ICP备17001798号
Copyright © 2002-2021
VENSHOP.COM. All Rights Reserved.