บางครั้งจำเป็นต้องพิจารณาว่าเซิร์ฟเวอร์ติดตามไฟล์ dll หรือไม่ จากนั้นคุณสามารถดูรหัสต่อไปนี้เพื่อตรวจสอบได้ ASP กำหนดว่ามีการติดตั้งส่วนประกอบบางอย่างบนเซิร์ฟเวอร์หรือไม่ นั่นคือมีการติดตั้งไฟล์ dll บางไฟล์หรือไม่ และมีการลงทะเบียนส่วนประกอบบางอย่างบนเซิร์ฟเวอร์หรือไม่ มีส่วนประกอบของ ASP จำนวนมาก และการตัดสินสามารถลดข้อผิดพลาด ASP จำนวนมากได้ ส่วนใหญ่จะใช้ฟังก์ชั่นดังต่อไปนี้:
คัดลอกรหัสรหัสดังต่อไปนี้:
-
'ฟังก์ชัน: ตรวจสอบว่าส่วนประกอบของระบบมีอยู่หรือติดตั้งส่วนประกอบสำเร็จหรือไม่
'พารามิเตอร์: ชื่อส่วนประกอบ
ฟังก์ชัน IsObjInstalled (strClassString)
เมื่อเกิดข้อผิดพลาด ดำเนินการต่อต่อไป
IsObjInstalled = เท็จ
ผิดพลาด = 0
DimxTestObj
ตั้งค่า xTestObj = Server.CreateObject(strClassString)
ถ้า 0 = ผิดพลาด ดังนั้น IsObjInstalled = True
ตั้งค่า xTestObj = ไม่มีเลย
ผิดพลาด = 0
ฟังก์ชันสิ้นสุด
'รับหมายเลขเวอร์ชันของส่วนประกอบระบบ
ฟังก์ชัน getver (Classstr)
เมื่อเกิดข้อผิดพลาด ดำเนินการต่อต่อไป
เก็ทเวอร์=
ผิดพลาด = 0
DimxTestObj
ตั้งค่า xTestObj = Server.CreateObject(Classstr)
ถ้า 0 = ผิดพลาด ดังนั้น getver=xtestobj.version
ตั้งค่า xTestObj = ไม่มีเลย
ผิดพลาด = 0
ฟังก์ชันสิ้นสุด
-
วิธีการโทรมีดังนี้:
คัดลอกรหัสรหัสดังต่อไปนี้:
-
ถ้า IsObjInstalled(fso.file) =True แล้ว
response.write(ติดตั้งแล้ว)&getver(fso.file)
สิ้นสุดถ้า
-