ไม่กี่วันที่ผ่านมาพี่ชายของฉันบอกฉันว่าการใช้ ASP นั้นลำบากจริง ๆ สภาพแวดล้อมการรวบรวมนั้นแย่มาก
ในโปรแกรมสำหรับสิ่งนี้ฉันหยิบยกโซลูชันที่นี่ ใช้ VB เพื่อแทนที่วัตถุทั้งหมดของ ASP และเขียนโปรแกรม ASP บริสุทธิ์ใน VB
ทุกคนควรรู้ว่าในความเป็นจริงส่วนประกอบจำนวนมากใน ASP เขียนด้วย VB แต่สิ่งที่ทำให้ทุกคนรู้สึกไม่สะดวกมากคือวิธีการใช้ ASP โดยธรรมชาติ
ส่วนประกอบนี้เช่นการตอบสนองการร้องขอแอปพลิเคชันเซสชัน ฯลฯ หากฉันสามารถใช้ส่วนประกอบเหล่านี้ได้โดยตรงใน VB แล้วฉันก็ทำได้
เพียงพอที่จะใช้ VB เพื่อเขียน ASP เพื่อใช้โปรแกรม
ต่อไปนี้เป็นขั้นตอนโดยละเอียด:
1. สร้าง ActiveX DLL ใหม่ใน VB
2. ตอนนี้คุณต้องอ้างอิง DLL สองตัวใน VB
สิ่งแรกคือการอ้างถึง DLL ของเครื่องยนต์ ASP
เลือกคำสั่ง Project/References จากเมนูและอ้างถึง "Microsoft Active Pages Object Library '
หากคุณไม่พบคุณสามารถค้นหาไฟล์ ASP.DLL%SystemDirectory%/System32/InetSVR Directory ในไดเรกทอรีต่อไปนี้
คลิกปุ่ม 'เรียกดู ... ' เพื่อนำเข้าไลบรารีการเชื่อมต่อแบบไดนามิกนี้
ประการที่สองคือการอ้างถึงวัตถุ Microsoft Transaction Server (MTS)
'Microsoft Transaction Server Type Library'
หากคุณไม่พบคุณสามารถค้นหาไฟล์ mtxas.dll นี้ได้ในไดเรกทอรีต่อไปนี้
%SystemDirectory%/System32/MTS/3 การเตรียมการทั้งหมดเสร็จสมบูรณ์วิธีการเขียนรหัสด้านล่างฉันคิดว่าทุกคนสามารถเข้าใจได้
ของ.
นี่คือรหัสของไฟล์:
ตัวเลือกอย่างชัดเจน
dim m_objresponse เป็นการตอบสนอง
dim m_objrequest ตามคำขอ
dim m_objserver เป็นเซิร์ฟเวอร์
dim m_objapplication เป็นแอปพลิเคชัน
dim m_objsession เป็นเซสชัน
คลาสย่อย class_initialize ()
dim objcontext เป็น ObjectContext
ตั้งค่า objcontext = getObjectContext ()
ตั้งค่า m_objresponse = objcontext (การตอบสนอง)
ตั้งค่า m_objrequest = objcontext (คำขอ)
ตั้งค่า m_objserver = objcontext (เซิร์ฟเวอร์)
ตั้งค่า m_objapplication = objcontext (แอปพลิเคชัน)
ตั้งค่า m_objsession = objcontext (เซสชัน)
สิ้นสุดย่อย
Asptest ย่อยสาธารณะ ()
M_OBJRESPONSE.WRITE FAREWELL ไปยังบอร์ดการเขียนใช้สภาพแวดล้อม VB เพื่อเขียนโปรแกรม ASP!
สิ้นสุดย่อย
วางรหัสข้างต้นลงในโปรแกรมของคุณจากนั้นรวบรวมโครงการนี้เป็น DLL การใช้งานขั้นสุดท้าย
regsvr32 componentName.dll ลงทะเบียน dll นี้ลงใน IIS
ต่อไปนี้เป็นวิธีการใช้ส่วนประกอบนี้ในไฟล์ ASP:
-
ตั้งค่า object = server.createObject (yourprjname.asptest)
objtest.asptest
ตั้งค่าวัตถุ = ไม่มีอะไร
-
ฉันหวังว่าวิธีการของฉันจะสามารถแก้ปัญหาความทุกข์ของพี่ชายได้ฮ่าฮ่า