ASP Application ¶ÔÏó
ÔÚÒ»ÆðÐͬ¹¤×÷ÒÔÍê³ÉijÏîÈÎÎñµÄÒ»×é ASP Îļþ³Æ×÷Ó¦ÓóÌÐò£¨application£©¡£ASP ÖÐµÄ Application ¶ÔÏóÓÃÓÚ½«ÕâЩÎļþÀ¦°óÔÚÒ»Æð¡£
Application ¶ÔÏó
web ÉϵÄÒ»¸öÓ¦ÓóÌÐò¿ÉÒÔÊÇÒ»×é ASP Îļþ¡£ÕâЩ ASP ÎļþÒ»ÆðÐͬ¹¤×÷À´Íê³ÉijÏîÈÎÎñ¡£ASP ÖÐµÄ Application ¶ÔÏóÓÃÀ´°ÑÕâЩÎļþÀ¦°óÔÚÒ»Æð¡£
Application ¶ÔÏóÓÃÓÚ´æ´¢ºÍ·ÃÎÊÀ´×ÔÈκÎÒ³ÃæµÄ±äÁ¿£¬ÀàËÆÓÚ session ¶ÔÏó¡£²»Í¬Ö®´¦ÔÚÓÚ£¬ËùÓеÄÓû§·ÖÏíÒ»¸ö Application ¶ÔÏ󣬶ø session ¶ÔÏóºÍÓû§µÄ¹ØÏµÊÇÒ»Ò»¶ÔÓ¦µÄ¡£
Application ¶ÔÏó´æÓлᱻӦÓóÌÐòÖеÄÐí¶àÒ³ÃæÊ¹ÓõÄÐÅÏ¢£¨±ÈÈçÊý¾Ý¿âÁ¬½ÓÐÅÏ¢£©¡£ÕâÒâζ×Å¿ÉÒÔ´ÓÈκεÄÒ³Ãæ·ÃÎÊÕâЩÐÅÏ¢¡£Í¬Ê±Ò²Òâζ×ÅÄã¿ÉÔÚÒ»¸öµØµã¸Ä±äÕâЩÐÅÏ¢£¬È»ºóÕâЩ¸Ä±ä»á×Ô¶¯·´Ó³ÔÚËùÓеÄÒ³ÃæÉÏ¡£
´æ´¢ºÍÈ¡»Ø Application ±äÁ¿
Application ±äÁ¿¿É±»Ó¦ÓóÌÐòÖеÄÈκÎÒ³Ãæ·ÃÎʺ͸ı䡣
¿ÉÒÔÏñÕâÑùÔÚ "Global.asa" Öд´½¨ Application ±äÁ¿£º
<script language="vbscript" runat="server"> Sub Application_OnStartapplication("vartime")=""
application("users")=1
End Sub </script>
ÔÚÉÏÃæµÄÀý×ÓÖУ¬ÎÒÃÇ´´½¨ÁËÁ½¸ö Application ±äÁ¿£º"vartime" ºÍ "users"¡£
¿ÉÒÔÏñÕâÑù·ÃÎÊ Application ±äÁ¿µÄÖµ£º
There are <% Response.Write(Application("users")) %> active connections.
±éÀú Contents ¼¯ºÏ
Contents ¼¯ºÏ°üº¬×ÅËùÓÐµÄ application ±äÁ¿¡£ÎÒÃÇ¿ÉÒÔͨ¹ý¶Ô contents ¼¯ºÏ½øÐбéÀú£¬À´²é¿´ÆäÖд洢µÄ±äÁ¿£º
<%
dim i
For Each i in Application.Contents
Response.Write(i & "<br />")
Next
%>
Èç¹ûÄã²»Çå³þ contents ¼¯ÖеÄÏîÄ¿ÊýÁ¿£¬¿ÉʹÓà count ÊôÐÔ£º
<%
dim i
dim j
j=Application.Contents.Count
For i=1 to j
Response.Write(Application.Contents(i) & "<br />")
Next
%>
±éÀú StaticObjects ¼¯ºÏ
¿Éͨ¹ýÑ»· StaticObjects ¼¯ºÏ£¬À´²é¿´ËùÓд洢ÓÚ Application ¶ÔÏóÖеĶÔÏóµÄÖµ£º
<%
dim i
For Each i in Application.StaticObjects
Response.Write(i & "<br />")
Next
%>
Ëø¶¨ºÍ½âËø
ÎÒÃÇ¿ÉÒÔʹÓà "Lock" ·½·¨À´Ëø¶¨Ó¦ÓóÌÐò¡£µ±Ó¦ÓóÌÐòËø¶¨ºó£¬Óû§ÃǾÍÎÞ·¨¸Ä±ä Application ±äÁ¿ÁË£¨³ýÁËÕýÔÚ·ÃÎÊ Application ±äÁ¿µÄÓû§£©¡£ÎÒÃÇÒ²¿ÉʹÓà "Unlock" ·½·¨À´¶ÔÓ¦ÓóÌÐò½øÐнâËø¡£Õâ¸ö·½·¨»áÒÆ³ý¶Ô Application ±äÁ¿µÄËø¶¨£º
<%
Application.Lock
'do some application object operations
Application.Unlock
%>