หากคุณต้องการออกจากระดับผู้ที่ชื่นชอบ ASP คุณควรเรียนรู้ที่จะเขียนส่วนประกอบสำหรับ ASP ฉันค้นหาบน Google และพบว่ามีเพียงไม่กี่บทความเกี่ยวกับส่วนประกอบ ASP ที่เขียนของ Delphi ดังนั้นวันนี้ฉันเขียนบทความพื้นฐานนี้เกี่ยวกับการเขียนส่วนประกอบ ASP Delphi โดยหวังว่าจะเป็นประโยชน์สำหรับมือใหม่ หากคุณต้องการเรียนรู้ VB เพื่อเขียนส่วนประกอบ ASP ขอแนะนำให้ตรวจสอบบทความโดย Tornado Big Brother (http://blog.csdn.net/online/category/9939.aspx) ซึ่งไม่ใช่สิ่งที่ฉันสามารถเปรียบเทียบได้ กับ. ฮิฮิ :)
มาเริ่มกันเถอะเขียนตัวอย่างของ "Hello World!" ด้วยกัน ฉันใช้ Delphi 7 ที่นี่
1. file-> new-> other-> activex-> activex library จากนั้นบันทึกเป็น showdll.dpr
2. อีกครั้งไฟล์ -> ใหม่ -> อื่น ๆ -> activex -> วัตถุเซิร์ฟเวอร์ Activex เติม coclassname: showhello, อื่น ๆ ยังคงไม่เปลี่ยนแปลงคลิกตกลง
3. ตอนนี้เริ่มเขียนโปรแกรมและเพิ่มวิธีการก่อน เลือก ishowhello-> คลิกขวา-> new-> วิธีและกรอกชื่อวิธี: Sayworld
4. ตอนนี้เริ่มเขียนโปรแกรมบันทึก UNIT1 เป็น show.pas จากนั้นเพิ่มรหัสของวิธีการ SayWorld
รหัสเต็มของ show.pas มีดังนี้:
การแสดงหน่วย;
{$ warn symbol_platform ปิด}
ส่วนต่อประสาน
ใช้
comobj, activex, asptlb, showdll_tlb, stdvcl;
พิมพ์
tshowhello = คลาส (taspobject, ishowhello)
ได้รับการคุ้มครอง
ขั้นตอน onendpage;
ขั้นตอน onstartpage (const ascriptingContext: iunknown);
ขั้นตอน SaysWorld;
จบ;
การดำเนินการ
ใช้ comserv;
ขั้นตอน tshowhello.onendpage;
เริ่ม
มรดก onendpage;
จบ;
ขั้นตอน tshowhello.onstartPage (const ascriptingContext: iunknown);
เริ่ม
สืบทอด onstartpage (ascriptingContext);
จบ;
ขั้นตอน tshowhello.sayworld ();
เริ่ม
Response.write ('Hello World');
จบ;
การเริ่มต้น
tautoobjectfactory.create (comserver, tshowhello, class_showhello,
cimultiinstance, tmapartment);
จบ.
4. คลิกเรียกใช้รวบรวมลงใน DLL และลงทะเบียนโดยอัตโนมัติ ในเวลานี้คุณจะแจ้ง:
ให้คุณวางบนเว็บเซิร์ฟเวอร์เพื่อเรียกใช้ตอนนี้เขียนไฟล์ ASP และเรียกว่า
รหัส showhello.asp ที่แก้ไขมีดังนี้:
<html>
<body>
<title> ทดสอบ Delphi ASP </title>
<enter>
<H3> คุณควรเห็นผลลัพธ์ของเมธอดเซิร์ฟเวอร์ที่ใช้งานของ Delphi ด้านล่าง </h3>
</enter>
<Hr>
<% set delphiaspobj = server.createObject ("showdll.showhello")
delphiaspobj.sayworld
-
<Hr>
</body>
</html>
เรียกใช้ภายใต้เว็บไซต์ของ IIS เพื่อดูเอฟเฟกต์:
5. อื่น:
ส่วนประกอบที่เขียนโดย Delphi หลังจากลงทะเบียนกับ Win2000 Component Service คุณสามารถดูวิธีการเชื่อมต่อของส่วนประกอบ
6. นอกจากนี้ยังมีพารามิเตอร์ที่ผ่านระหว่างหน้า ASP และส่วนประกอบซึ่งจริง ๆ แล้วจะส่งผ่านพารามิเตอร์ไปยังวิธีที่เรียกว่า (ฟังก์ชั่น) โปรดฝึกฝนเพิ่มเติมเหล่านี้ นี่คือการเรียนรู้วิธีการห่อหุ้มรหัสหลักของ ASP และมีบทบาทในการดึงดูดหยก