最新下载
热门教程
- 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")
%>
你也可以用数据库存储,当然是多用户时候了。简单的话这样就行了。
相关文章
- 风暴奇侠矿物探测仪怎么用-详细用法介绍 05-15
- Trezor钱包app下载软件 05-15
- 小狐狸电子钱包手机下载 05-15
- 小狐狸钱包网址手机版下载 05-15
- 小狐狸钱包下载app安卓版 05-15
- Dogecoin钱包官方版 05-15