asp程序设计第10讲

1、教学目标： 了解application、server对象的属性及事件 熟练运用它们编写ASP应用程序 了解global.asa文件的概念,第10章 ASP的内置对象,第10章 ASP的内置对象,教学内容： 10.1 Application 对象 10.2 Server对象 10.3 ObjectContext对象 10.4 技能与实训 10.5 思考与练习,10.1 Application 对象,10.1.1 Application对象概述 Application对象用于存储对所有用户都共享的信息，并可以在Web应用程序运行期间持久地保持数据。 所有的用户公用一个Application对象，都

2、可以对Application对象进行修改 利用Application对象可以可以创建聊天室、网站计数器等等,10.1.2 Application对象属性,用以下句法设置用户定义的属性也可称为集合 ： Application( 属性 / 集合名称 )= 值 Application对象的集合有两个： Contents集合：表示没有使用元素定义的存储于Application对象中的所有变量（及它们的值）的一个集合 StaticObjects集合：表示使用元素定义的存储于Application对象中的所有变量（及它们的值）的一个集合,10.1.2 Application对象属性,application

3、.contents(1)=“a”赋值语句和 application.contents(“a”)=“a” 这个赋值语句功能 是一样的。 Contents集合还有2个方法： Contents.Remove(“变量名”)：从Application.Content集合中删除一个Application变量 Contents.RemoveAll（）：从Application.Content集合中删除所有变量,10.1.2 Application对象属性,适用性： 由于存储在 Application 对象中的数值可以被应 用程序的所有用户读取，所以 Application 对象 的属性特别适合在应用程序的用

4、户之间传递信 息。,10.1.3 Application对象方法,Application 对象有两个方法 : 1、Lock 方法：禁止其他客户修改 Application 对象的属性。 2、Unlock 方法：允许其他客户修改 Application 对象的属性,10.1.3 Application对象方法,例 10-1 用Application对象记录页面被访问的次数 例10-1 ,10.1.3 Application对象方法, 欢迎光临本网页 您是本页的第位访客 ,10.1.3 Application对象方法,注意： 为防止多个用户同时修改存储在Application对象中 的变量，在修改

5、Application对象中的变量的时候， 我们加了Application.lock方法，以锁定Application 对象,10.1.4 Application对象事件,(1)、Application_OnStart 当 WEB 服务器启动并允许对应用程序所包含的文件进行 请求时就触发 Application_OnStart 事件 Application_OnStart 事件的语法如下 : Sub Application_OnStart. . . End Sub ,10.1.4 Application对象事件,(2)、Application_OnEnd Application_OnEnd 事

6、件在应用程序退出时于 Session_OnEnd 事件之后发生,10.1.4 Application对象事件,注意的事项： 1、不能在 Application 对象中存储 ASP 内建对象 2、若您将一个数组存储在 Application 对象中，请不要直接更改存储在数组中的元素,10.1.5 修改Application 变量的值,方法：修改Application变量的值，可以直接用赋值符号“”把值赋给Application变量就可以了。格式如下： application变量=值。 问题：当多个客户同时修改application变量时，可能会造成意想不到的错误。那么这时我们就要用到applic

7、ation的两个方法：lock和unlock,10.1.6 Global.asa 文件,定义：它其实是一个可选文件，程序编写者可以在该文件中指定事件脚本，并声明具有会话和应用程序作用域的对象 ，专门用来存放全局变量和局部变量 原则：该文件的名称必须是 Global.asa 且必须存放在应用程序的根目录中。每个应用程序只能有一个 Global.asa 文件。,10.2 Server 对象,10.2.1 Server 对象属性 ScriptTimeout ：程序能够运行的最大时间 原则：Scripttimeout的值要大小要适中 。如果Scripttimeout的值太小，则会在连接网页的时候经常出

8、现服务器超时。如果Scripttimeout的值太大，则会浪费资源,10.2.2 Server 对象方法,一、CreateObject 语法：Server.CreateObject(progID) 功能：指定要创建的组件名称 要点：一般来说,用由Server.CreateObject方法创建的对象拥有页面的范围.这就说,当这页的asp程序执行完后,这种对象会自动地消失.,10.2.2 Server 对象方法,二、Execute 语法：Server.Execute(Path) 参数：Path , 指定执行的那个asp文件的路径。如是它是一个绝对路径，那么它必须是一个在这个ASP应用程序相同的地方

9、（目录） 说明：Server.Execute方法提供了一种将一个复杂ASP应用程序分化为小块单位来执行的方法,10.2.2 Server 对象方法,例 10-2 用execute 方法调用10-1.asp中的内容 例10-2 ,10.2.2 Server 对象方法, ,10.2.2 Server 对象方法,三、URLEncode 作用：URLEncode方法可以将指定字符串进行URL编码 语法：Server.URLEncode(string) 参数：string指定要转化的字符串,10.2.2 Server 对象方法,例10-3 用URLEncode 方法将指定字符串进行URL编码 例103

10、response.write 字符串的URL编码是：,10.2.2 Server 对象方法,response.write Response.Write (Server.URLEncode() % ,10.2.2 Server 对象方法,语法格式：Server.MapPath(Path) 功能：用于把web server的虚拟路径转换为实际路径。 虚拟路径映射为物理路径 的代码： ,10.2.2 Server 对象方法,Server对象的其他几个方法 ： GetLastError：返回一个错误代码 MapPath：将一个相对路径转化为一个绝对路径. Transfer：将当前的所有状态信息发送给另

11、一个asp文件,10.3 ObjectContext对象,方法： 1 SetComplete方法：SetComplete方法不理会未完成执行的任何理由。如果所有组件都使用SetComplete方法，则执行就一定被完成。 2 SetAbort方法：SetAbort方法声明该脚本开始的执行不被完成，并且不再更新资源,10.3 ObjectContext对象,事件 ： 1 、OnTransactionCommit： OnTransactionCommit事件发生在脚本的 transaction被提交之后。当 OnTransactionCommit事件发生时,IIS 将运行 OnTransaction

12、Commit事件子程序，如果它存在,10.3 ObjectContext对象,2 OnTransactionAbort OnTransactionAbort事件发生在脚本的 transaction被终止之后。当OnTransactionAbort 事件发生时， IIS 将运行OnTransactionAbort事 件子程序，如果它存在。,10.3 ObjectContext对象,实例：从10-4.asp文件获得请求销售的数据到处理程序10- 5.asp。当数量不够时用SetAbort方法终止处理，返回错误 代码。否则完成处理。两文件的代码如下： 例 10-4.asp ： 例 10-4.asp

13、例 10-4.asp,10.3 ObjectContext对象, 订购表单 所要的产品数量：,10.3 ObjectContext对象, ,10.3 ObjectContext对象,例 10-5.asp 例 10-5.asp 100 then objectcontext.SetAbort(),10.3 ObjectContext对象,response.write 您要的数量不够 else objectcontext.setcomplete response.write 您已成功订购 end if %,10.3 ObjectContext对象, ,10.4 技能与训练,聊天室相关的三个文件： g

14、lobal.asa文件 ：存放变量 10-6.asp ：主文件 10-7.asp ：用户离开时的文件 各个文件 的代码如下：,10.4 技能与训练,global.asa 文件 ： sub application_onstart application(vn)=0 application(ly)=欢迎你来到欢乐聊天室 end sub sub session_onstart,10.4 技能与训练,end sub sub session_onend end sub ,10.4 技能与训练, 例10-6.asp ,10.4 技能与训练,你是本站的第位客人. 输入你的昵称: ,10.4 技能与训练, t

15、hen 判断客户是否在聊天界面中,10.4 技能与训练,session(nick)=request.form(nick) end if % 说话 ,10.4 技能与训练,离开 1 then if trim(request.form(talk)= then 判断用户是否没有输入任何内容 talk=session(nick)&沉默是金 else talk=trim(request.form(talk) end if,10.4 技能与训练,application.lock application(show)=session(nick)&time&说:&talk&application(show) a

16、pplication.unlock response.write application(show) end if end if %,10.4 技能与训练, ,10.4 技能与训练,例10-7 离开的主页面 欢迎你再来我们聊 ,10.4 技能与训练, ,10.4 技能与训练,分析： 1、在global.asa文件 中定义 了全局变量application(“ly”)、application(“rs”)。方便在下面进行调用 2、用输入的谈话内容用request获取，并存放在变量talk中。Talk=trim(request.form(“talk”),1. 填空题 (1) 创建聊天室时，公聊所用到

17、的对象是_。 (2) 从Application.Content集合中删除一个Application变量am，所用到的语句是_。 (3) Application_OnStart事件的处理过程必须写在_文件之中。 (4) Global.asa文件是_文件。 (5) 服务器处理脚本在60秒后超时所使用的代码为_。,10.5 思考与练习,2. 选择题 (1) 用于存储所有用户都共享的信息的对象是( )。 A. Session B. Application C. Response D. Request (2) 禁止其他客户修改Application对象属性的方法是( )。 A. Lock B. Unlock C. Close D. Unclose,(3) 下面哪一个脚本可以创建一个名称为fs的File Access组件？( ) A. B. C. D. (4) 取得当前文件的虚拟路径的代码为( )。 A. Server.MapPath B. Request.ServerVariables C. Request.MapPa