إذا كنت ترغب في الخروج من مستوى عشاق ASP ، فعليك أن تتعلم كتابة مكونات لـ ASP. لقد بحثت على Google ووجدت أنه لا يوجد سوى عدد قليل من المقالات حول مكونات Delphi التي تكتب ASP ، لذلك كتبت اليوم هذا المقال الأساسي حول مكونات Delphi التي تكتب ASP ، على أمل أن يكون مفيدًا للمبتدئين. إذا كنت ترغب في تعلم 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-> انقر بزر الماوس الأيمن-> جديد> ، وملء اسم الطريقة: Sayworld.
4. ابدأ الآن في كتابة البرنامج ، وحفظ الوحدة 1 كـ show.pas ، ثم أضف رمز الطريقة sayworld
رمز العرض الكامل. PAS كما يلي:
عرض الوحدة ؛
{$ WARN SYMBON_PLATFORM OFF}
واجهة
يستخدم
comobj ، activex ، asptlb ، showdll_tlb ، stdvcl ؛
يكتب
tshowhello = فئة (taspobject ، ishowhello)
محمية
الإجراءات الظهر ؛
الإجراء onStartPage (const ascriptingcontext: iunknown) ؛
الإجراء safecall ؛
نهاية؛
تطبيق
يستخدم comserv.
الإجراء tshowhello.onendpage ؛
يبدأ
صفحة المرتبة الموروثة ؛
نهاية؛
الإجراء tshowhello.onstartPage (cerccriptingContext: iunknown) ؛
يبدأ
onStartPage الموروثة (ascriptingContext) ؛
نهاية؛
الإجراء tshowhello.sayworld () ؛
يبدأ
Response.write ("Hello World") ؛
نهاية؛
التهيئة
tautoObjectFactory.create (Comserver ، Tshowhello ، class_showhello ،
cimultiinstance ، tmapartment) ؛
نهاية.
4. انقر فوق تشغيل ، وتجميعه في DLL ، وتسجيله تلقائيًا. في هذا الوقت ، ستطالب:
دعك تضعه على خادم الويب.
رمز showhello.asp المعدل هو كما يلي:
<html>
<body>
<title> اختبار Delphi ASP </title>
<centre>
<h3> يجب أن ترى نتائج طريقة خادم Delphi Active الخاص بك أدناه </h3>
</center>
<hr>
<٪ set delphiaspobj = server.createObject ("showdll.showhello")
delphiaspobj.sayworld
٪>
<hr>
</body>
</html>
قم بتشغيله تحت موقع IIS لمعرفة التأثير:
5. آخر:
المكون الذي كتبه Delphi ، بعد التسجيل مع خدمة Win2000 مكون ، يمكنك رؤية طريقة الواجهة للمكون
6. هناك أيضًا معلمات تمر بين صفحة ASP والمكون ، والتي هي في الواقع تمرير المعلمات إلى الطريقة المدعومة (الوظيفة). الرجاء ممارسة هذه أكثر. هذا هو التعلم بشكل أساسي كيفية تغليف الكود الأساسي لـ ASP ولعب دور في جذب اليشم.