تصميم المواقع باستخدام isapi

[زكيري عبدالعالي]

اذا كتبنا
localhost
نتحصل على الصفة المطلوبه اي اسمي على
اذا نجحت في ذلك نمر الى

4- وضع متغيرة NOM في الصفحة بالشكل

كود :

اسمي <#NOM>

حيث نقوم بكتابت مشروع دلفي ISAPI يقوم بكتابه (علي علوي)
مكان NOM
كيف ذلك

كود :

file--> new-->other..-->webserverapplication-->ispai === WebModule1

في شريط االدوات نختار المكون

كود :

nternet--->PageProducer === PageProducer1

في الخاصية

كود :

HTMLFile -- > مسار الملف و اسمه

في الحدث

كود :

ONHTMLTag

كود :

Producer1HTMLTag(Sender: TObject; Tag: TTag; const TagString: Strin g; TagParams: TStrings; var ReplaceText: String);BEGIN IF uppercase(TagString)='NOM' THEN ReplaceText:='علي علوي';END;

الان سنضيف اكشن التي ستنفذ لنا عملية عرض الصفحة.
لا حظ الصورة
ثم نكتب الكود التالي في الحدث

كود :

PROCEDURE TWebModule1.WebModule1gotoindexAction(Sender: TObject; Request: TWebRequest; Response : TWebResponse; var Handled: Boolean);BEGIN Response.Content:=PageProducer1.Content;END;

ماعلينا الان الا الكمبيل لكي نتحصل على ملف DLL و ليكن PROJECT1.DLL
نضع هذا الملف في المسار الذي تريده و مثالنا سنضعه في
C:\Apache\htdocs\bin
حيث اضف bin مجلد جديد

[IMG]http://www.arabteam2000-forum.com/uploads/monthly_02_2009/
post-1034-1233862980.jpg[/IMG

كود :

] http://www.arabteam2000-forum.com/uploads/monthly_02_2009/post-1034-1233862986.jpg

كود :

http://www.arabteam2000-forum.com/uploads/monthly_02_2009/post-1034-1233863335.jpg

II- كيفية فتح ملف html بواسطة ACTION ISAPI
---------------------------------------------------------------------------------
*- الان سنقوم بانشاء صفحة اشتامل ولنسميها مثلا
myhtmlfile.html

*-نضع الملف في C:allsourcehtml
نضع المكون
PageProducer1
في الخاصية
HTTPFILE
نكتب

كود :

C:\allsourcehtmlmyhtmlfile.html

في الحدث
PageProducer1HTMLTag
نكتب

كود :

procedure TWebModule1.PageProducer1HTMLTag(Sender: TObject; Tag: TTag; const TagString: String; TagParams: TStrings; var ReplaceText: String);begin IF UpperCase(TagString)='NOM' THEN ReplaceText:='ZEKIRI ABDELALI ISAPI V0.1 ';end;