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_OnStart
application("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
%>
VUE