如何实现强制登录？

security.asp

<%

bLoggedIn = (len(session("UserName")) > 0)

if bRequireLogin then

' 要求登录.

if Not bLoggedIn then

response.redirect "login.asp?comebackto=" & _

request.servervariables("script_name") & "?" & _

' 如果没注册,请注册.

server.urlencode(request.querystring)

end if

end if

%>

　

login.asp

<%

if request("comebackto") <> "" then

sReferer = request("comebackto")

sGoBackTo = "?" & request.querystring

end if

if request("cmdLogin") <> "" then

sUserName = request("txtUserName")

sPassword = request("txtPassword")

' 提交注册.

if sUserName = "bill" And sPassword = "gates" then

bLoginSuccessful = True

' 验证帐号和密码.

end if

session("UserName") = sUserName

if sReferer = "" then

response.redirect "index.asp"

' 登录成功,到用户请求页.

else

response.redirect sReferer

' 如果没填写,重定向到登录页或其他约定的页.

end if

else

%>

<form action="login.asp<%=sGoBackTo%>" method="post">

<input type="text" name="txtUserName"><br>

<input type="password" name="txtPassword"><br>

<input type="submit" name="cmdLogin"><br>

</form>

' 显示登录.

<%

end if

%>

testpage.asp

<%

bRequireLogin = True

%>

<!--#include file="security.asp"-->

' 将 bRequireLogin设为真,放到 security.asp 中.

[1]

赞 (0)

相关推荐

  • Java web项目中的强制登录功能实现代码

    为了避免直接进入项目中存在的页面,使用filter过滤器 新建一个类loginFilter: package com.tjcu.filter; import com.tjcu.entity.User; import javax.servlet.*; import javax.servlet.http.HttpServletRequest; import javax.servlet.http.HttpServletResponse; import javax.servlet.http.HttpSe

  • 如何实现强制登录？

    security.asp <% bLoggedIn = (len(session("UserName")) > 0) if bRequireLogin then ' 要求登录. if Not bLoggedIn then response.redirect "login.asp?comebackto=" & _ request.servervariables("script_name") & "?"

  • Windows server 2012远程桌面会话主机和远程桌面授权

    Windows server 2012远程桌面会话主机和远程桌面授权

    远程桌面服务是一项由若干角色服务组成的服务器角色.在 Windows Server 2012 中,远程桌面服务包含以下角色服务: Windows Server? 2012 中的"远程桌面服务"服务器角色提供了允许用户连接到虚拟机.RemoteApp程序和基于会话的计算机的技术.通过远程桌面服务,用户可以从企业网络或 Internet 访问远程连接. Windows Server 2012默认情况下,只能提供两个用户远程桌面登陆,而通过安装远程桌面服务里的远程桌面会话主机和远程桌面授权,

  • 如何自动化部署项目？折腾服务器之旅~

    如何自动化部署项目？折腾服务器之旅~

    本篇文章讲的不是如何把一个项目部署上线,而是如何自动化上线. 开发了一个需求管理和发布系统. 通过这个系统,可以创建需求.创建发布计划.创建分支.部署到测试环境.部署到生产环境.正式上线.合并代码等. 一.功能设计 9.9元的阿里云服务器真的很慢,但还是足够折腾完这个项目. 用3个目录来模拟不同的环境. 目录 存放 project 存放所有的项目,比如本系统的前后端代码. pre-dir 预发环境,当然是用来测试的. pro-dir 生产环境,测试没问题,部署上线. 一图胜千言. 二.系统页面

  • iOS 12+ 中检测网络访问的方法

    我最近写了一篇文章,来介绍 iOS 在连接新的 Wi-Fi 网络时,如何在弹出一个 web view 以让用户登录或注册之前,检测 Captive Portals (强制网络门户).如果你连接过诸如酒店.酒吧或咖啡店等地的公共 Wi-Fi 网络,对这个应该会比较熟悉.如果你不熟悉 iOS 中 Captive Portals 的工作方式,可以查看 Solving the Captive Portal Problem on iOS 这篇文章,以了解一些背景知识. 多年来,Apple 的 Reacha

  • 利用JavaScript缓存远程窃取Wi-Fi密码的思路详解

    我一直想在这个小项目上花一些时间做一些研究,但是由于生活所迫让我总是一直繁忙.现在我终于可以抽出一些时间了继续研究这种攻击技术了,我将在本文中阐述我的研究成果. 很久以前,我学习了Vivek Ramachandran讲解的"无线局域网安全Megaprimer课程"(课程非常好,强烈推荐),顺便说一下,在我做旅行的时候,我住的那些不同的酒店都会提供Wi-Fi.毋庸置疑,我的大脑开始变得疯狂,因此我一直在思考获取Wi-Fi密码的"非常规"的方法. Can't turn

  • 由于没有远程桌面授权服务器可以提供许可证，远程会话被中断的根本解决方法

    Windows server 2012服务器远程桌面登录时出现错误提示:"由于没有远程桌面授权服务器可以提供许可证,远程会话被中断.请跟服务器管理员联系."此时可以使用"mstsc /admin /v:目标ip"来强制登录服务器,但只能是管理员身份. 按照网上说的某种方法,删除注册表以下项:HKEY_LOCAL_MACHINE\Software\Microsoft\MSLicensing. 并不能解决问题,之后出现了新的错误提示,如第二个图:"远程会话已断

  • Windows Server 2012 没有远程桌面授权服务器可以提供许可证，远程会话被中断

    今天在登录公司内部的服务器的时候,无法进行远程访问. 弹出错误信息:没有远程桌面授权服务器可以提供许可证,远程会话被中断 经过网上的寻找,原来是server 2012 远程登录只提供120天的使用期限. 一 . 参照以下这篇文章 根本解决:由于没有远程桌面授权服务器可以提供许可证,远程会话被中断. 此博文包含图片 (2015-11-19 21:52:48)转载▼ 标签: server2012 远程桌面 授权服务器 许可证 远程会话被中断 Windows server 2012服务器远程桌面登录时

  • Windows Server 2016远程桌面服务配置和授权激活(2个用户)

    Windows Server 2016远程桌面服务配置和授权激活(2个用户)

    Server 2016默认远程桌面连接数是2个用户,如果多余两个用户进行远程桌面连接时,系统就会提示超过连接数,可以通过添加远程桌面授权解决: 1.添加远程桌面授权服务 第一步:服务器管理 - 添加角色和功能打开添加角色和功能向导窗口,选择基于角色或给予功能安装: 第二步:添加远程桌面会话主机和远程桌面授权功能: 以上配置完成后即可使用多于2用户同时登陆,但使用期限为120天,再次登陆会有如下提示: 2.添加远程桌面授权许可 添加之前将时间调至未来的一个时间,用来增加使用期限 打开远程桌面授权管

  • Windows Server 2016快速入门部署远程桌面服务的详细图文步骤

    Windows Server 2016快速入门部署远程桌面服务的详细图文步骤

    现在2016服务器比win2008与2012支持多站点https服务,下面我们小编就为大家分享一下 打开服务器管理器,然后单击管理 -> 添加角色和功能 在" 开始之前"页面上的向导中,单击"下一步". 在" 选择安装类型"页面上,选择" 远程桌面服务安装",再 单击"下一步". 在" 选择 部署类型"页面上,选择" 快速入门" ,然后单击"下一步&q

随机推荐