给自己一点时间接受自己,爱自己,趁着下午茶的时间来学习图老师推荐的2.3 深入研究Application和Session对象,过去的都会过去,迎接崭新的开始,释放更美好的自己。
【 tulaoshi.com - Web开发 】
用ASP编写虚拟社区、网上购物等程序时,Application和Session对象具有举足轻重的作用,能够灵活合理地运用这两个对象是提高程序质量的关键。下面让笔者根据自己在这方面的经验,向大家深入介绍一下ASP的这两个内建对象。
  一、Application对象的成员概述
  Application对象成员包括Application对象的集合、方法和事件。
  ⒈Application对象的集合
  Contents集合:没有使用OBJECT元素定义的存储于Applicaiton对象中的所有变量的集合
  StaticObjects:使用OBJECT元素定义的存储于Application对象中的所有变量 的集合
  例:在default.asp中有如下赋值  application("a")="a"  则有contents集合
  application("b")=128
  application("c")=false  application.contents(1)="a" '也可写为application.contents("a")="a"  在此笔者推荐你在调用时使用类如application.contents("a")的方法,因为这样更为直观,如果用序号来表示的话则要考虑赋值的先后顺序。
  application.contents(2)=128 '也可写为application.contents("b")=128
  application.contents(3)=false '也可写为application.contents("c")=false
  ⒉Application对象的方法
  Contents.Remove("变量名"):从Application.Contents集合中删除指定的变量
  Contents.RemoveAll() :把Application.Contents集合中的所有变量删除
  Lock() :锁定Application对象,使得只有当前的ASP页对内容能进行访问
  Unlock() :解除对Application对象的锁定
  例:在default.asp中:  application("a")="a"  执行结果:
  application("b")=128
  application("c")=false
  response.write application.contents(1)&"br"
  response.write application.contents(2)&"br"
  response.write application.contents(3)&"br"
  response.write "After Remove b:"
  application.contents.remove("b")
  response.write application.contents(1)&"br"
  response.write application.contents(2)&"br"
  a
  128
  False
  After Remove b:
  a
  False
  如果要删除集合中所有变量用application.contents.removeall即可,至于Lock和Unlock方法在实际中经常用到,读者也比较熟悉,在此就不在累赘。 
  ⒊Application对象事件
  OnStart:第一个访问服务器的用户第一次访问某一页面时发生
  OnEnd :当最后一个用户的会话已经结束并且该会话的OnEnd事件所有代码已经执行完毕后发生,或最后一个用户访问服务器一段时间(一般为20分钟)后仍然没有人访问该服务器产生。
  想要定义application对象的OnStart和OnEnd事件里做什么需要将代码写在Global.asa这个文件里(下文有举例),并且将该文件放在站点的根目录下(一般是Inetpubwwwroot)
  二、Session对象的成员概述
  Session对象的成员比Application对象多一项属性,即:集合、属性、方法、事件
  ===global.asa===
  <script LANGUAGE="VBScript" RUNAT="Server">
  Sub Application_OnStart
   application("online")=0
  End Sub 
  sub Application_OnEnd
  nd Sub 
  Sub Session_OnStart 
  End Sub 
  Sub Session_OnEnd 
   if session.contents("pass") then '判断是否为登录用户的Session_OnEnd
    application.lock
    application("online")=application("online")-1
    application.unlock
   end if
  End Sub 
  </script>
  ==============
  ===login.asp===   session("name")=rs("name")
   session("id")=rs("id")
   session("pass")=true
  else
   rs.close
   conn.close
   response.write "密码错误!"
   response.end
  end if
  application.lock
  application("online")=application("online")+1
  conn.Execute ("update bbs set online=1 where id="&session("id"))'将用户的状态设为在线
  application.unlock
  rs.close
  conn.close
  response.redirect "index.asp" '初始化数据后跳转到社区首页
  ===========
  ===global.sas===
  <script LANGUAGE="VBScript" RUNAT="Server">
  Sub Application_OnStart
   application("online")=0
   set application("conn")=Server.CreateObject("ADODB.Connection") 
   application("db")=Server.MapPath("b⒈Session对象的集合
  Contents :没有使用OBJECT元素定义的存储于特定Session对象的所有变量的集合。
  StaticObject:使用OBJECT元素定义的、存储于Session对象中的所有变量的集合。
  例:在default.asp中有如下赋值
  session("a")="a"
  session("b")=128
  session("c")=false
  则有contents集合
  session.contents(1)="a" '也可写为session.contents("a")="a"
  session.contents(2)=128 '也可写为session.contents("b")=128
  session.contents(3)=false '也可写为session.contents("c")=false
  ⒉Session对象的属性
  CodePage: 可读/可写。整型。定义用于在浏览器中显示页内容的代码页。代码页是字符集的数字值,不同的语言使用不同的代码页。例如,ANSI代码页为1252,日文代码页为932,简体中文代码页为936。
  LCID : 可读/可写。整型。定义发送给浏览器的页面地区标识。LCID是唯一地标识地区的一个国际标准缩写,例如,2057定义当前地区的货币符号是"£"。
  SessionID: 只读。长整型。返回本会话的会话标识符。每创建一个会话,由服务器自动分配一个标识符。可以根据它的值判断两个用户是谁先访问服务器。
  Timeout : 可读/可写。整型。为会话定义以分钟为单位的超时限定。如果用户在这个时间内没有刷新或请求任何一个网页,则该用户产生的会话自动结束。缺省值是20。
以上属性在实际应用中作用不大,而且基本上不需要怎么修改,这几个属性也没什么特殊的地方。
  ⒊Session对象的方法
  Contents.Remove("变量名"): 从Session.contents集合中删除指定的变量
  Contents.Removeall() : 删除Session.contents集合中的所有变量
  Abandon() : 结束当前用户会话并且撤消当前Session对象。
  Session对象的Contents.Remove("变量名")和Contents.Removeall()方法与Application对象的基本上没什么区别,为帮助理解,大家可以参照上面的例子将Application改为Session。这里要说明一下的是Contents.Removeall()和Abandon()的区别,执行这两个方法都会释放当前
  用户会话的所有Session变量,不同的是Contents.Removeall()单纯地释放Session变量的值而不终止当前的会话,而Abandon()除了释放Session变量外还会终止会话引发Session_OnEnd事件,希望大家注意两者的区别。
  ⒋Session对象的事件
  OnStart: 当ASP用户会话产生时触发,一旦有任一用户对本服务器请求任一页面即产生该事件。
  OnEnd : 当ASP用户会话结束时触发,当使用Abandon()方法或超时也会触发该事件。
  这两个事件和Application的OnStart、OnEnd事件一样,也是必须放在Global.asa文件里,下
面就重点和大家研究一下这四个事件的使用。
  三、Global.asa
  ASP的Application和Session对象体现了其他ASP内置对象所没有的特征--事件。每一个访客访问服务器时都会触发一个OnStart事件(第一个访客会同时触发Application和Session的OnStart事件,但Application先于Session),每个访客的会话结束时都会触发一个OnEnd事件(最后一个访客会话结束时会同时触发Application和Session的OnEnd事件,但Session先于Application)。
  OnStart和OnEnd这两个事件一般应用在虚拟社区中统计在线人数、修改用户的在线离线状态等。要具体定义这两个事件,需要将代码写在Global.asa文件,并将该文件放在站点的根目录下(缺省是Inetpubwwwroot)。另外,Application和Session对象规定了在OnEnd事件里除了Application对象外其他ASP内置对象(Response、Request、Server、Session...)一概不能使用。以下举一个虚拟社区统计在线人数的例子来说明如何使用这两个事件。
  文件说明:
  global.asa 位于d:Inetpubwwwroot目录下
  default.asp 位于d:Inetpubwwwroot目录下,虚拟社区登录页面
  login.asp 位于d:Inetpubwwwroot目录下,用于检测用户输入的用户名及密码
  index.asp 位于d:Inetpubwwwroot目录下,虚拟社区首页
                        来源:http://www.tulaoshi.com/n/20160219/1604761.html
看过《2.3 深入研究Application和Session对象》的人还看了以下文章 更多>>