บทความนี้สร้างไฟล์ ActiveXDLL ผ่าน VB5.0 ไฟล์นี้จำลองกระบวนการของการโยนสีย่อยและแนะนำคุณในหัวข้อของวิธีการเรียก DLL ใน ASP
ไดนามิกเข้าร่วมไลบรารี (DLL) เป็นวิธีสำคัญในการเร่งการดำเนินการของส่วนสำคัญของแอปพลิเคชัน แต่สิ่งหนึ่งที่อาจไม่เป็นที่รู้จักสำหรับคนส่วนใหญ่นั่นคือไฟล์ ASP ยังสามารถเรียก DLLS เพื่อเร่งการดำเนินการของเซิร์ฟเวอร์ ด้านล่างนี้ฉันจะแนะนำขั้นตอนการโทร DLL ในไฟล์ ASP สั้น ๆ
ก่อนอื่นต้องมีไฟล์ DLL ตัวอย่างนี้คือการสร้างไฟล์ ActiveXDLL ผ่าน VB5.0 ไฟล์นี้จำลองกระบวนการของการโยนสีย่อย
ในสภาพแวดล้อม VB5.0 สร้างโครงการใหม่และดับเบิลคลิกที่ไอคอน ActiveXDLL ในหน้าต่างโครงการใหม่ VB จะเพิ่มโมดูลคลาสโดยอัตโนมัติในโครงการและตั้งค่าประเภทโครงการเป็น ActiveXDLL ในหน้าต่างคุณสมบัติเปลี่ยนแอตทริบิวต์ชื่อของโมดูลคลาสเป็น CLSDICE จากเมนูโครงการเลือกคุณสมบัติโครงการและเปลี่ยนชื่อโครงการเป็น MYDLL จากเมนูไฟล์เลือกบันทึก clsdice เพื่อบันทึกโมดูลคลาสเป็น mydice.cls เพิ่มรหัสต่อไปนี้:
ตัวเลือก Explicit
Privatemax, Pointasinteger
PublicPropertyGetResult () asinteger
ผลลัพธ์ = จุด
ปลายทาง
PublicProperTyGetMaxPoint () asinteger
maxpoint = สูงสุด
ปลายทาง
PublicPropertyletMaxPoint (NumaSinteger)
สูงสุด = num
ปลายทาง
Publicsubthrow ()
สุ่ม
point = int (rnd*สูงสุด) +1
enddub
Privatesubclass_initialize ()
สูงสุด = 6
enddub
โมดูลคลาสนี้กำหนดคุณสมบัติสองคุณสมบัติและวิธีการของวัตถุ CLSDICE คุณสมบัติและวิธีการเหล่านี้จำลองกระบวนการขว้างเหรียญสี คุณสมบัติ MaxPoint แสดงจำนวนใบหน้าของเหรียญสี การเพิ่มคำสั่ง PropertyLet จะช่วยให้ลูกค้าสามารถปรับเปลี่ยนใบหน้าของเหรียญสีได้ คุณสมบัติผลลัพธ์แสดงถึงจำนวนจุดของการขว้างเหรียญสุดท้ายของเหรียญสี วิธีการโยนหมายถึงการกระทำของการขว้างเหรียญสี คำสั่ง privatesubclass_initialize กำหนดจำนวนใบหน้าเริ่มต้นของใบหน้าสีเป็น 6 ใบหน้า
จากเมนูไฟล์เลือกสร้าง mydll.dll และบันทึกไปยังสถานที่ที่เหมาะสม ณ จุดนี้เราสร้างไฟล์ DLL ของเราเอง
ขั้นตอนที่สองคือการอ้างถึงคลาส Clsdice ในไฟล์ ASP
รหัสทั้งหมดของ ASP (ActiveServerPages) ทำงานบนเซิร์ฟเวอร์และลูกค้าสามารถดูผลลัพธ์ที่ส่งคืนใน HTML เท่านั้น มันใช้แท็ก "<%" และ "%>" เพื่อระบุรหัสสคริปต์และไม่ส่งกลับไปยังไคลเอนต์และใช้แท็ก HTML เพื่อระบุเนื้อหานอกรหัส ในรหัส DICE.ASP ต่อไปนี้ฟังก์ชั่น CreateObject ใช้เพื่อสร้างอินสแตนซ์วัตถุ CLSDICE ซึ่งมาจากไฟล์ ActiveX.DLL-MYDLL.DLL ที่สร้างขึ้นด้านบน ตัวอย่างต่อไปนี้ใช้ภาษาสคริปต์ VBScript
<!-metadatatype = "typelib" file = "path/mydll.dll"->