程序员

如何实现某些页面只让特定的用户浏览?

作者:admin 2021-04-14 我要评论

global.asp script language=vbscript runat=server sub Session_onstart session("register")="false" ' 记录用户成功登录的信息 . session("lognumber")=0 ' ...

在说正事之前,我要推荐一个福利:你还在原价购买阿里云、腾讯云、华为云服务器吗?那太亏啦!来这里,新购、升级、续费都打折,能够为您省60%的钱呢!2核4G企业级云服务器低至69元/年,点击进去看看吧>>>)

global.asp
     <script language=vbscript runat=server>

 sub Session_onstart

  session("register")="false"

' 记录用户成功登录的信息.

  session("lognumber")=0

   ' 记录用户尝试登录的次数,最多允许尝试三次.

  session("prescript")=""

  ' 记录用户要访问的页面,以便登录后返回该页.

  end sub

  </script>

 

register.asp

  <% if request.form("b1")="提交" then

  set

  conn=server.createobject("adodb.connection")

  conn.open "asptest"

 sql1="select * from permission where xm='"&&request.form("name") &&"' and mima='"&&request.form  ("password")&&"'"

  set rs=conn.execute(sql1)

   if not rs.eof then

   session("register")="true"

   ' 若数据库中存在该用户的信息,就记录该用户成功登录的标记到register变量中.

  rs.close

   conn.close

  response.redirect session("prescript")

  ' 成功登录后自动返回刚才要访问的页面.

  end if

  if session("lognumber")<3 then

  session("lognumber")=

  session("lognumber")+1

  response.redirect "register.asp"

  else

  response.redirect "sorry.asp"

  end if

  ' 允许尝试登录三次,若都未成功,显示出错页面sorry.asp.

  end if%>

  <html><head></head>

  <body bgcolor="#c0c0c0" >

  <p align="center">

  <marquee align="middle"

  behavior="alternate" >星河影动欢迎您,请先登录!</marquee><br>

 

  <%if session("lognumber")>0 then%>

  输入有误!请重新输入姓名和口令.

  <% end if%>

  </p><hr>

  <form action="register.asp" method="post" name="form1">

  <div align="center"><p>姓名:

  <input name="name" size="13"></p>

  <p>口令:<input name="password"

  size="13"type="password"></p></div>

  <div align="right"><input type="submit" name="b1" value="提交" >

  </div></form></body></html>

 

protect.asp

' 精彩的要限制的页面.

  <% if session("register")< >"true" then

  session("prescript")=

  request.servervariables("script_name")

   response.redirect "register.asp"

  end if%>

   ' 记录该页面的路径到prescript变量中并强制用户登录.

  <html><head>

  <meta http-equiv="Content-Type"

  content="text/html; charset=gb_2312-80"></head>

  <body bgcolor="#00FFFF">

' 此处可注明该页面的精彩内容.

  </body></html>

  

[1]


本文转载自网络,原文链接:https://m.jb51.net/article/4737.htm

版权声明:本文转载自网络,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。本站转载出于传播更多优秀技术知识之目的,如有侵权请联系QQ/微信:153890879删除

相关文章
  • 四两拨千斤——你不知道的VScode编码Ty

    四两拨千斤——你不知道的VScode编码Ty

  • 我是如何在 Vue 项目中做代码分割的

    我是如何在 Vue 项目中做代码分割的

  • position:sticky 粘性定位的几种巧妙应

    position:sticky 粘性定位的几种巧妙应

  • 从零到一搭建React组件库

    从零到一搭建React组件库

腾讯云代理商
精彩导读
海外云服务器
热门资讯
腾讯云代理商