一般来说，在实际开发中，对于 Session 对象使用最多的就是用户登录部分了，这个案例将简单模拟一个用户登录表单、用户是否登录的判断以及用户退出的一系列功能，它一共分了以下几个页面。

Login.asp (用户登录)、Check.asp (用户是否已经登录判断)、Logout.asp (用户退出)

Login.asp 用户登录部分

我们将要完成用户登录表单的显示，以及提交后，对于用户输入密码的判断和写 Session 的操作，主要代码如下:

<%
Dim sPassword
'判断是否POST提交单表，开始登录
If UCase(Request.ServerVariables("REQUEST_METHOD")) = "POST" Then'提交表单登录，判断密码
  sPassword = Trim(Request.Form("password"))If sPassword = "123456" Then Session("password") = "123456"Response.Write("<h3>您已经登录成功！请访问<a href=""Check.asp"">登录检查文件</a></h3>")ElseResponse.Write("<h3>您输入的密码有误！</h3>")'Response.End()End If
Else'显示表单，让用户登录
%><form method="post" action="">请输入密码：<input name="password" type="text"/><input type="submit" value="提交"/></form>
<%
End If
%>

运行效果如下：

登录成功，显示如下：

Check.asp 登录判断部分

用来检查用户 Session，从而判断是否已经登录，主要代码如下：

<%
Dim sPassword
sPassword = Trim(Session("password"))
if sPassword = "" ThenResponse.Write("<h3>您还没有登录呢，请访问<a href=""Login.asp"">登录表单</a></h3>")
Else Response.Write("<h3>您已经登录了，可以访问<a href=""Logout.asp"">退出页面</a></h3>")
End If
%>

如果成功登录显示：

如果没有登录显示：

Logout.asp 用户退出部分

通过 Session 的 Remove 方法来清空 Cookies，从而实现用户的退出。主要代码如下：

<%
Session.Contents.Remove("password")
Response.Write("<h3>成功退出，可以访问<a href=""Login.asp"">登录页面</a></h3>")
%>

运行后显示：

示例代码下载

SessionLogin.rar

转载于:https://www.cnblogs.com/pchmonster/p/4731366.html

ASP入门（十一）-Session小案例相关推荐

VUE入门+5个小案例
本文是我心血来潮学习Vue框架所做的笔记,也供童鞋们学习参考.作为后端的开发人员,学习前端的Vue框架只是单纯地去了解下前端框架的内容,所以并没有深入地去学习,因此本文只适合Vue入门的童鞋哦.由于我 ...
python爬虫案例-Python爬取租房数据实例，据说可以入门爬虫的小案例！
一.什么叫爬虫爬虫,又名"网络爬虫",就是能够自动访问互联网并将网站内容下载下来的程序.它也是搜索引擎的基础,像百度和GOOGLE都是凭借强大的网络爬虫,来检索海量的互联网信息的 ...
Python爬取租房数据实例，据说可以入门爬虫的小案例！
一.什么叫爬虫爬虫,又名"网络爬虫",就是能够自动访问互联网并将网站内容下载下来的程序.它也是搜索引擎的基础,像百度和GOOGLE都是凭借强大的网络爬虫,来检索海量的互联网信息的 ...
初学者：python调用gurobi入门混合整数规划小案例
数学模型: ''' \ Model MIP \ LP format - for model browsing. Use MPS format to capture full model detail. ...
JavaWeb：shiro入门小案例
学习原因:刚接触Javaweb的时候懂的很少(当然现在也不多),所以开发一个小项目都是自己从头写到尾,从登录界面一直到数据库,当时想以后开发要是都这么写那不是很枯燥?!-知道后来团队开发,接触的开发人 ...
axios vue 回调函数_Vue 02 —— Vue 入门小案例~使用 Axios 中的GET、POST请求
作为后端攻城狮,写前端代码是一种什么体验? 相信不少人和 @Python大星一样,有写过前端代码的经历. 记录一下,Vue 框架开发中"啼笑皆非"的故事,非专业前端人员,该案例无 ...
spring boot入门小案例
spring boot 入门小案例搭建 (1) 在Eclipse中新建一个maven project项目,目录结构如下所示: cn.com.rxyb中存放spring boot的启动类,applica ...
python输入10个数字排序案例_介绍十个Python小案例，新手入门就在这里
今天给大家分享十个Python入门级别的小案例. 案例一:排列组合要求: 将4个数字可能组成的所有互不相同且无重复数字的排列组合列出. 分析: 排列就好了代码: 案例二:阶梯求和要求: 企业实行 ...
python新手入门代码-介绍十个Python小案例，新手入门就在这里
案例一:排列组合要求: 将4个数字可能组成的所有互不相同且无重复数字的排列组合列出. 注意:很多人学Python过程中会遇到各种烦恼问题,没有人帮答疑容易放弃.为此小编建了个Python全栈免费答疑 ...

ASP入门（十一）-Session小案例

Login.asp 用户登录部分

Check.asp 登录判断部分

Logout.asp 用户退出部分

示例代码下载

ASP入门（十一）-Session小案例相关推荐

最新文章

热门文章