(3)存储数组 在 Application对象中可以存储数组,但是不能 直接更改存储在数组中的元素,这是因为 Application对象是作为集合实现的。如果将数组存 放在 Application对象中,则对该数组进行操作时 应先建立数组的一个副本,对该副本操作完毕,再将 其存放到 Application对象中。 【例9-3】使用 Application对象存储数组,运行 结果 程序93.asp的代码如下: <HTML> <HEAD>< TITLE>创建并使用 Application数组变量</ TITLE></HEAD BODY> < P align=" center">创建并使用 Application数组变量<hr>
(3) 存储数组 在Application对象中可以存储数组，但是不能 直接更改存储在数组中的元素 ， 这是因为 Application对象是作为集合实现的。如果将数组存 放在Application对象中，则对该数组进行操作时， 应先建立数组的一个副本，对该副本操作完毕，再将 其存放到Application对象中。 【例9-3】使用Application对象存储数组，运行 结果。 程序9_3.asp的代码如下： <HTML> <HEAD><TITLE>创建并使用Application数组变量</TITLE></HEAD> <BODY> <P align="center">创建并使用Application数组变量<hr>
( Dim book O redim book(3) 创建数组book book(0)="高等数学习题及解 book(1)=”高等数学复习指 book(2)="政治经济学习题及解答 book(3)="电路习题及解答′ Application("复习指导书”)=book 将book存放到 lApplication变量:复习指导书 table<tr>< td colspan=2>复习指导书 %bk= Application("复习指导书”)% 创建“复习指导书”的副本 <tr><td>1.<td><%=(bk(0))% <trx<td>2.<td>%=(bk(1)% <trx<td>3.<td>%=(bk(2)% <tr><td>4.<td><%=(bk(3) </table> /BODY> K/HTML>
<% Dim book() redim book(3) ' 创建数组book book(0)="高等数学习题及解答" book(1)="高等数学复习指导" book(2)="政治经济学习题及解答" book(3)="电路习题及解答" Application("复习指导书")=book ' 将book存放到Application变量：复习指导书 %> <table><tr><td colspan=2>复习指导书 <% bk=Application("复习指导书") %> ' 创建“复习指导书”的副本 <tr><td>1.<td><%=(bk(0))%> <tr><td>2.<td><%=(bk(1))%> <tr><td>3.<td><%=(bk(2))%> <tr><td>4.<td><%=(bk(3))%> </table> </BODY> </HTML>
2 Application对象的方法 Application对象共有两个方法,它们分别 Lock方法和 Unlock方法 在一个ASP应用程序中,如果同时访问的用户很 多,就可能会出现很多用户同时修改某个 Application变量,这时如果没有一个良好的机制来 确保同一时刻仅有一个用户修改和存取 Application 变量,后果将是无法想像的
2. Application对象的方法 Application对象共有两个方法，它们分别是 Lock方法和Unlock方法。 在一个ASP应用程序中，如果同时访问的用户很 多 ， 就可能会出现很多用户同时修改某个 Application变量，这时如果没有一个良好的机制来 确保同一时刻仅有一个用户修改和存取Application 变量，后果将是无法想像的
Lock和 Unlock方法正是为此而设计的,在使用 Lock以后,可以防正其他用户修改存储在 Application对象中的变量,直到用户使用 Unlock方 法或超时,才解开 Application对象,这样就确保在 同一时刻只有一个用户可以修改和存储 Application 对象中的变量。Lock方法和 Unlock方法的语法格式分 别如下: Application Lock Application. Unlock
Lock和Unlock方法正是为此而设计的，在使用 Lock 以 后 ， 可 以 防 止 其 他 用 户 修 改 存 储 在 Application对象中的变量，直到用户使用Unlock方 法或超时，才解开Application对象，这样就确保在 同一时刻只有一个用户可以修改和存储Application 对象中的变量。Lock方法和Unlock方法的语法格式分 别如下： Application.Lock Application.Unlock
【例9-4】在例92中使用Lock方法和 Unlock方法 确保同一时刻只有一个用户可以修改和存储 Application对象中的变量,运行结果 程序92.asp改为如下的代码: html> <head></head> <body> h3> Application实例</h3><hr> name=Request Form( visitor " i=Request Form("chato") if name<> then Applicat Lock if i=o then Application("chinese )=Application(" chinese")+ hat="中文 elseif i=l the Application( english )=Application (" english)+1 chat="英文
【例9-4】在例9-2中使用Lock方法和Unlock方法 确 保 同 一 时 刻 只 有 一 个 用 户 可 以 修 改 和 存 储 Application对象中的变量，运行结果。 程序9_2.asp改为如下的代码： <html> <head></head> <body> <h3>Application实例</h3><hr> <% name=Request.Form("visitor") i=Request.Form("chatno") if name<>"" then Application.Lock if i=0 then Application("chinese")=Application("chinese")+1 chat="中文" elseif i=1 then Application("english")=Application("english")+1 chat="英文" end if