最新下载
热门教程
- 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")
%>
你也可以用数据库存储,当然是多用户时候了。简单的话这样就行了。
相关文章
- 《无限暖暖》天星之羽获得位置介绍 12-20
- 《流放之路2》重铸台解锁方法介绍 12-20
- 《无限暖暖》瞄准那个亮亮的成就怎么做 12-20
- 《无限暖暖》魔气怪终结者完成方法 12-20
- 《无限暖暖》曙光毛团获得位置介绍 12-20
- 《无限暖暖》日光果获得位置介绍 12-20