当前位置:主页   - 电脑 - 网站开发 - ASP
ASP入门教程-保存应用程序信息
来源:网络   作者:含笑    更新时间:2010-09-26
收藏此页】    【字号    】    【打印】    【关闭

一、使用 Contents 集合应用程序信息

1、Contents 集合是由所有通过脚本语言添加到应用程序的变量和对象组成的集合。可以使用这个集合来获得给定的应用程序作用域的变量列表或指定某个变量为操作对象。Contents 集合是 Application 对象默认的集合,因此下述两种格式是等价的:

  Application.Contents("变量名")
  Application("变量名")

其中,“变量名”是需要操作的 Application 变量名称。

2、实例代码(1.asp):使用 Session 对象编写一个简单的计数器程序。

<html>
<head><title>>Application.Contents集合的应用</title>
</head>
<body>
<center><h3>Application实例</h3><hr width="70%"></center>
<%
name=Request.Form("visitor")
i=Request.Form("chatno")
if name<>"" then
if i=0 then
Application("chinese")=Application("Chinese")+1
chat="中文"
elseif i=1 then
Application("English")=Application("English")+1
chat="英文"
end if
Response.write "<center>欢迎<b>" & name & "</b>,你是来到"
Response.write "<b>" & chat & "</b>讨论区的第"
if chat="中文" then
Response.write Application.Contents("Chinese") & "位客人。<p>"
else
Response.write Application.Contents("English") & "位客人。<p>"
end if
Response.write "<a href='http://www.bianceng.cn/webkf/asp/200802/4-6-2.asp'>返回</a></center>"
Response.end
end if
%>
<center>
<form method=post>
<table><tr><td>名字:<td><input type=text name="visitor" size=12>
<tr><td>讨论区:<td><Select name="Chatno">
<option value=0>中文</option>
<option value=1>英文</option>
</select>
<input type=submit value="确定">
</table>
</form>
</center>
</body>
</html>

二、使用Application.StaticObjects 集合保存应用程序信息

Application 对象的StaticObjects 集合包含所有的在应用程序范围内使用 OBJECT 标记创建的对象,可以使用该集合确定某对象的指定属性的值或遍历集合及检索所有静态对象的所有属性。

1、StaticOBjects 集合的语法格式:

Application.StaticObjects(key)

其中参数 Key 指定要检索的项目值。

2、创建具有会话作用域的对象:

在 global.asa 文件中,使用 OBJECT 标记并将 SCOPE 属性设置为 “Application" 可以创建有应用程序作用域的对象。例如:

   <OBJECT RUNAT=”Server" SCOPE="Application" ID=ID PROGID="MSWC.AdRotator"></OBJECT>

4、不能在 Application 对象中存储内建对象。例如,下面每一行脚本都将返回错误。

    <%
       set Application("varl")=Session
       set Application("var2")=Request
       set Application("var3")=Response
       set Application("var4")=Server
       set Application("var5")=Application
    %>

三、使用 Application 对象存储数组

也可以将一个数组存储在 Application 对象中,但不要直接更改存在 Application 数组中的元素。例如,下在的脚本无法运行。

    <% Application ("StoredArray") (3)="new value" %>

实例代码(2.asp) 创建一个数组

<% @ language="vbscript" %>
<html>
<head>
<title>Application 数组应用示例 </title></head>
<body>
<%
dim poem()                              '创建一个数组
Redim poem(3)                            '为数组分配存 空间
poem(0)="姓名:n?quot;                     '为数组进行初始化
poem(1)="性别:女"
poem(2)="E-mail:www@163.com"
Application.Lock                            '锁定Application 对象
Application("StoredArray")=poem               '将数组存储到 Application 对象中
Application.Unlock                         '解除对Application 对象的锁定
Server.Transfer"3.asp"                      '调用另外一个.asp文件
%>
</body>
</html>

3.asp页码:将Application 数组复制给一个本地数组并输出到客记端, 然后,修改本地数组元素的值并输出到客户端,最后 ,将本地数组存储到Application对象中。

<%
'将Application 数组复制给一个本地数组并输出到客记端
LocalArray=Application("StoredArray")
Response.Write "<Div Align=center>"
For Each s in LocalArray
Response.write s & "<br>"
next
Response.write "<hr width='50%' color='#cc9999'><p>"
'修改本地数组元素的值并输出到客户端
LocalArray(0)="姓名:难书"
LocalArray(1)="性别:女"
LocalArray(2)="E-mail:ddddd@163.com"
For each s In LocalArray
Response.write s & "<br>"
next
Response.Write "</div>"
'将本地数组存储到Application对象中
Application.lock
Application("StoredArray")=LocalApplication
Application.Unlock
%>

查看全套ASP入门教程

其它资源
来源声明

版权与免责声明
1、本站所发布的文章仅供技术交流参考,本站不主张将其做为决策的依据,浏览者可自愿选择采信与否,本站不对因采信这些信息所产生的任何问题负责。
2、本站部分文章来源于网络,其版权为原权利人所有。由于来源之故,有的文章未能获得作者姓名,署“未知”或“佚名”。对于这些文章,有知悉作者姓名的请告知本站,以便及时署名。如果作者要求删除,我们将予以删除。除此之外本站不再承担其它责任。
3、本站部分文章来源于本站原创,本站拥有所有权利。
4、如对本站发布的信息有异议,请联系我们,经本站确认后,将在三个工作日内做出修改或删除处理。
请参阅权责声明