最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
ASP实现最简单的加密
时间：2022-06-30 09:17:57 编辑：袖梨 来源：一聚教程网
我在中国素材网的论坛看到网友问怎么简单加密，具体实现可以这样写：
用asp,Perl忘完了。
先写一个登陆表单。假设reg.asp
西路登陆页面
再来一个登陆验证 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")
%>
你也可以用数据库存储，当然是多用户时候了。简单的话这样就行了。
用asp,Perl忘完了。
先写一个登陆表单。假设reg.asp
再来一个登陆验证 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")
%>
你也可以用数据库存储，当然是多用户时候了。简单的话这样就行了。
相关文章
- 远光84侦查英雄有哪些 侦查英雄介绍 08-28
- 远光84最稳灵敏度怎么调 灵敏度调试攻略 08-28
- 伊瑟兑换码最新 伊瑟可用兑换码及输入位置 08-28
- 诛仙2超度我二奇遇怎么做 超度我二学府奇遇攻略 08-28
- 远光84最强英雄是谁 最强英雄介绍 08-28
- 远光84队长适用枪械有哪些 队长适配枪械一览 08-28