ไฟล์ Global.asa ASP

ไฟล์ Global.asa คือไฟล์ที่เป็นตัวเลือก ซึ่งสามารถมีประกาศของอ็อบเจ็กท์ ตัวแปร และวิธีที่สามารถถูกเข้าถึงได้โดยแต่ละหน้าของโปรแกรม ASP ทั้งหมด

ไฟล์ Global.asa

ไฟล์ Global.asa คือไฟล์ที่เป็นตัวเลือก ซึ่งสามารถมีประกาศของอ็อบเจ็กท์ ตัวแปร และวิธีที่สามารถถูกเข้าถึงได้โดยแต่ละหน้าของโปรแกรม ASP ทั้งหมด โดยทุกบราวเซอร์สคริปต์ที่ถูกต้องสามารถใช้ได้ใน Global.asa

ไฟล์ Global.asa สามารถมีเนื้อหาดังนี้:

  • เหตุการณ์ Application
  • เหตุการณ์ Session
  • แท็ก <object> รับซึ่ง
  • TypeLibrary 声明
  • คำสั่ง #include

หมายเหตุ:ไฟล์ Global.asa ต้องถูกจัดเก็บในไดเรกทอรีรากของโปรแกรม ASP และแต่ละโปรแกรมมีไฟล์ Global.asa มีเพียงแค่หนึ่งไฟล์เท่านั้น。

เหตุการณ์ใน Global.asa

ใน Global.asa สามารถบอกให้ตัวแปร application และ session ทราบว่าจะทำอะไรเมื่อเริ่มและจบงาน โค้ดที่ทำงานดังกล่าวถูกจัดไว้ในปัญหาเหตุการณ์ ไฟล์ Global.asa สามารถรวมไฟล์เหตุการณ์ทั้งสี่ประเภท:

Application_OnStart - หน้าเหตุการณ์นี้จะเกิดขึ้นทุกครั้งที่ผู้ใช้สุดท้ายที่ร้องขอหน้าแรกของ ASP ระบบ หน้าเหตุการณ์ "Session_OnStart" จะเกิดขึ้นทันทีหลังจากหน้าเหตุการณ์นี้

Session_OnStart - หน้าเหตุการณ์นี้จะเกิดขึ้นทุกครั้งที่ผู้ใช้ร้องขอหน้าแรกของ ASP ระบบของตนเอง

Session_OnEnd - หน้าเหตุการณ์นี้จะเกิดขึ้นทุกครั้งที่ผู้ใช้จบ session ของตนเอง หากไม่มีหน้าที่บอกคำขอภายในระยะเวลาที่กำหนด (ได้รับมาตราฐานโดยเหตุการณ์เริ่มต้นคือ 20 นาที) หน้าจะทำงานให้ session หยุดงาน

Application_OnEnd - หน้าเหตุการณ์นี้จะเกิดขึ้นหลังจากที่ผู้ใช้สุดท้ายที่จบ session ของตนเอง มากันเสร็จ ในกรณีทั่วไป หน้าเหตุการณ์นี้จะเกิดขึ้นเมื่อเซิร์ฟเวอร์เว็บหยุดงาน โค้ดหน้าเหตุการณ์นี้ใช้เพื่อล้างการตั้งค่าหลังจากการหยุดงานของโปรแกรม เช่น ลบบันทึกหรือเขียนข้อมูลไปยังไฟล์ข้อความ

ไฟล์ Global.asa อาจเหมือนนี้:

<script language="vbscript" runat="server">
sub Application_OnStart
  'some code
end sub
sub Application_OnEnd
  'some code
end sub
sub Session_OnStart
  'some code
end sub
sub Session_OnEnd
  'some code
end sub
</script>

หมายเหตุ:เนื่องจากไม่สามารถใส่โค้ดด้วยนัยสีของ ASP (<% และ %>) ในไฟล์ Global.asa นั้น เราต้องใช้องค์ประกอบ <script> ของ HTML

แท็ก <object> รับซึ่ง

สามารถสร้างตัวแปรที่มีส่วนหรือขอบเขต session หรือ application ด้วยการใช้แท็ก <object> ในไฟล์ Global.asa

หมายเหตุ:แท็ก <object> ควรอยู่นอกจากแท็ก <script>

语法：

<object runat="server" scope="scope" id="id"
{progid="progID"|classid="classID"}>
....
</object>
参数 描述
scope ตั้งโดยที่มีส่วนหรือขอบเขตของตัวแปร (Session หรือ Application)
id กำหนด id แห่งได้เดียวกับตัวแปร。
ProgID

id ที่เชื่อมโยงกับ ClassID。รูปแบบ ProgID คือ: [Vendor.]Component[.Version]

ProgID หรือ ClassID จำเป็นต้องระบุ。
ClassID

กำหนด id แห่งได้เดียวกับตัวแปร COM ระบบคอมพิวเตอร์。

ProgID หรือ ClassID จำเป็นต้องระบุ。

实例

第一个实例创建了一个名为 "MyAd" 且使用 ProgID 参数的 session 作用域对象：

<object runat="server" scope="session" id="MyAd" progid="MSWC.AdRotator"
</object>

第二个实例创建了一个名为 "MyConnection" 且使用 ClassID 参数的

<object runat="server" scope="application" id="MyConnection"
classid="Clsid:8AD3067A-B3FC-11CF-A560-00A0C9081C21"
</object>

在此 Global.asa 文件中声明的这些对象可被应用程序中的任何脚本使用。

GLOBAL.ASA：

<object runat="server" scope="session" id="MyAd" progid="MSWC.AdRotator"
</object>

您可以从 ASP 应用程序中的任意页面引用此 "MyAd" 对象：

某个 .ASP 文件：

<%=MyAd.GetAdvertisement("/banners/adrot.txt")%>　

TypeLibrary 声明

TypeLibrary （类型库）是一个容器，其中包含对应于 COM 对象的 DLL 文件。通过在 Global.asa 中包含对 TypeLibrary 的调用，可以访问 COM 对象的常量，同时 ASP 代码也能更好地报告错误。如果您的站点的应用程序依赖于已在类型库中声明过数据类型的 COM 对象，您可以在 Global.asa 中对类型库进行声明。

语法：

<!--METADATA TYPE="TypeLib"
file="filename"
uuid="typelibraryuuid"
version="versionnumber"
lcid="localeid"
-->
参数 描述
file 规定了指向类型库的绝对路径。参数 file 或者 uuid，两者缺一不可。
uuid 规定了针对类型库的唯一标识符。参数 file 或者 uuid，两者缺一不可。
version 可选。用于选择版本。如果没有找到指定的版本，将使用最接近的版本。
lcid 可选。用于类型库的地区标识符。

错误值

服务器会返回以下之一的错误消息：

错误 代码 描述
ASP 0222 Invalid type library specification
ASP 0223 Type library not found
ASP 0224 Type library cannot be loaded
ASP 0225 Type library cannot be wrapped

หมายเหตุ:แท็ก METADATA สามารถตั้งอยู่ที่ทุกจุดในแฟ้ม Global.asa (ทั้งในและนอกแท็ก <script>) แต่เรายังแนะนำให้จัดทำแท็ก METADATA ที่ด้านบนของแฟ้ม Global.asa

ข้อจำกัด

เกี่ยวกับข้อจำกัดของสิ่งที่สามารถอ้างอิงได้ในแฟ้ม Global.asa

คุณไม่สามารถแสดงข้อความในแฟ้ม Global.asa ได้ แฟ้มนี้ไม่สามารถแสดงข้อมูลได้

คุณสามารถใช้โอปเจกต์ Server และ Application ได้ในซับรูปราย Application_OnStart และ Application_OnEnd คุณสามารถใช้โอปเจกต์ Server และ Application และ Session ในซับรูปราย Session_OnEnd คุณสามารถใช้โอปเจกต์ที่มีในลู่ที่สำหรับซับรูปราย Session_OnStart

วิธีการใช้ซับรูปราย

Global.asa มักถูกใช้ในการตั้งค่าตัวแปร

ตัวอย่างด้านล่างนี้แสดงวิธีการตรวจสอบเวลาที่ผู้เข้าชมมาเยือนเว็บครั้งแรก ระยะเวลานี้จะเก็บไว้ในตัวแปร Session ที่ชื่อว่า "started" และค่าของตัวแปร "started" สามารถถูกเข้าถึงได้โดยหน้า ASP ทุกหน้าในโปรแกรม

<script language="vbscript" runat="server">
sub Session_OnStart
Session("started")=now()
end sub
</script>

Global.asa ยังสามารถใช้ควบคุมการเข้าถึงหน้าเว็บได้

ตัวอย่างด้านล่างนี้แสดงวิธีการนำผู้เข้าชมใหม่ไปยังหน้าเว็บอื่น ในตัวอย่างนี้จะนำไปยังหน้า "newpage.asp" นี้

<script language="vbscript" runat="server">
sub Session_OnStart
Response.Redirect("newpage.asp")
end sub
</script>

เรายังสามารถบวกฟังก์ชันไว้ใน Global.asa ได้ด้วย

ในตัวอย่างด้านล่างนี้ ขณะที่เซิร์ฟเวอร์เว็บเริ่มทำงาน ซับรูปราย Application_OnStart ก็จะเริ่มทำงานด้วย หลังจากนั้น ซับรูปราย Application_OnStart จะเรียกซับรูปรายอื่นที่ชื่อว่า "getcustomers" ซับรูปราย "getcustomers" จะเปิดฐานข้อมูล และเอาข้อมูลมาจากตาราง "customers" แล้วนำมาเก็บในตัวแปรแบบรายการ ไม่ต้องทำการค้นหาฐานข้อมูล ทุกหน้า ASP สามารถเข้าถึงตัวแปรนี้ได้:

<script language="vbscript" runat="server">
sub Application_OnStart
getcustomers
end sub
sub getcustomers　
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"
set rs=conn.execute("select name from customers")
Application("customers")=rs.GetRows
rs.Close
conn.Close
end sub
</script>

ตัวอย่าง Global.asa

ในตัวอย่างนี้ เราต้องการที่จะสร้างไฟล์ Global.asa ที่สามารถคำนวณจำนวนผู้เยี่ยมชมในขณะนี้ได้

Application_OnStart ตั้งค่าค่าตัวแปร "visitors" ให้เป็น 0 เมื่อเซิร์ฟเวอร์เริ่มทำงาน。

เมื่อมีผู้ใช้ใหม่เข้ามาเยี่ยมชม ภารกิจ Session_OnStart จะเพิ่มค่าตัวแปร "visitors" ขึ้น 1 จากตัวแปร "visitors"。

เมื่อภารกิจ Session_OnEnd ถูกเรียกขึ้น ภารกิจนี้จะลดค่าตัวแปร "visitors" ลง 1 จากตัวแปร "visitors"。

ไฟล์ Global.asa：

<script language="vbscript" runat="server">
Sub Application_OnStart
Application("visitors")=0
End Sub
Sub Session_OnStart
Application.Lock
Application("visitors")=Application("visitors")+1
Application.UnLock
End Sub
Sub Session_OnEnd
Application.Lock
Application("visitors")=Application("visitors")-1
Application.UnLock
End Sub
</script>

นี้ ASP ไฟล์จะแสดงจำนวนผู้ใช้ที่มีอยู่ในขณะนี้：

<html>
<head>
</head>
<body>
<p>เมื่อนี้มี <%response.write(Application("visitors"))%> คนออนไลน์!</p>
</body>
</html>