asp Application 存储 取回 遍历实例

 Sub Application_OnStart
  application("vi")=""
  application("uid")=2
 End Sub
 '上面这段代码是创建 Application 变量
 
 Response.Write(Application("vi")) '输出值

 
 '上面是读取 Application 变量的值
 
 '遍历 Contents 集合Contents 集合包含着所有的 application 变量。我们可以通过对 contents 集合进行遍历，来查看其中存储的
 

 dim i
 dim j
 j=Application.Contents.Count
 For i=1 to j
   Response.Write(Application.Contents(i) & "
")
 Next

 
 '遍历 Contents 集合Contents方法二
 

 dim i
 For Each i in Application.Contents
   Response.Write(i & "
")
 Next

 
 '在asp  application 有个最重要的东西就是锁定与解锁，这个用来做在线人数时会用到代码如查

 
 Application.Lock
   application("url")="";
 Application.Unlock

 '注明，本文章原创于转载注明出处