كائن تطبيق ASP
تسمى مجموعة ملفات ASP التي تعمل معًا لأداء بعض الأغراض تطبيقًا.
كائن التطبيق
قد يتكون التطبيق الموجود على الويب من عدة ملفات ASP تعمل معًا لأداء بعض الأغراض. يتم استخدام كائن التطبيق لربط هذه الملفات معًا.
يتم استخدام كائن التطبيق لتخزين المتغيرات والوصول إليها من أي صفحة ، تمامًا مثل كائن Session. الفرق هو أن جميع المستخدمين يشاركون كائن تطبيق واحد (مع الجلسات ، يوجد كائن جلسة واحد لكل مستخدم).
يحتفظ كائن التطبيق بالمعلومات التي سيتم استخدامها بواسطة العديد من الصفحات في التطبيق (مثل معلومات اتصال قاعدة البيانات). يمكن الوصول إلى المعلومات من أي صفحة. يمكن أيضًا تغيير المعلومات في مكان واحد ، وستنعكس التغييرات تلقائيًا على جميع الصفحات.
تخزين واسترجاع متغيرات التطبيق
يمكن الوصول إلى متغيرات التطبيق وتغييرها بواسطة أي صفحة في التطبيق.
يمكنك إنشاء متغيرات التطبيق في "Global.asa" مثل هذا:
<script language="vbscript" runat="server">
Sub Application_OnStart
application("vartime")=""
application("users")=1
End Sub
</script>
في المثال أعلاه أنشأنا متغيرين للتطبيق: "vartime" و "users".
يمكنك الوصول إلى قيمة متغير تطبيق مثل هذا:
There are
<%
Response.Write(Application("users"))
%>
active connections.
حلقة من خلال مجموعة المحتويات
تحتوي مجموعة المحتويات على جميع متغيرات التطبيق. يمكنك إجراء حلقة عبر مجموعة المحتويات ، لمعرفة ما تم تخزينه فيها:
<%
dim i
For Each i in Application.Contents
Response.Write(i & "<br>")
Next
%>
إذا كنت لا تعرف عدد العناصر في مجموعة المحتويات ، فيمكنك استخدام خاصية العدد:
<%
dim i
dim j
j=Application.Contents.Count
For i=1 to j
Response.Write(Application.Contents(i) & "<br>")
Next
%>
حلقة من خلال مجموعة StaticObjects
يمكنك إجراء حلقة عبر مجموعة StaticObjects لرؤية قيم جميع الكائنات المخزنة في كائن التطبيق:
<%
dim i
For Each i in Application.StaticObjects
Response.Write(i & "<br>")
Next
%>
مقفل وغير مقفل
يمكنك قفل التطبيق بطريقة "القفل". عندما يتم قفل التطبيق ، لا يمكن للمستخدمين تغيير متغيرات التطبيق (بخلاف المتغير الذي يقوم بالوصول إليه حاليًا). يمكنك فتح تطبيق باستخدام طريقة "Unlock". تزيل هذه الطريقة القفل من متغير التطبيق:
<%
Application.Lock
'do some application object operations
Application.Unlock
%>