سجل عضوًا ، وإنشاء قاعدة بيانات تطوير الويب الخاصة بك ، واستخدم VB لكتابة برامج ASP الخالصة
قبل أيام قليلة ، أخبرني أخي أن استخدام ASP أمر مزعج حقًا ، فإن بيئة التجميع سيئة للغاية.
الكود ثم الصق الكود في برنامج ASP. استخدم VB لاستبدال ASP
جميع الكائنات تكتب برامج ASP النقية في VB.
يجب أن يعلم الجميع أنه في الواقع ، فإن العديد من المكونات في ASP مكتوبة في VB ، ولكنها تجعل الجميع يشعرون بأنهم غير مريحين
كيفية استخدام عدة مكونات متأصلة في ASP ، مثل الاستجابة والطلب والتطبيق والجلسة ، إلخ. إذا كنت
إذا كان يمكن استخدام هذه المكونات مباشرة في VB ، فيمكن استخدام VB لكتابة برنامج استخدام ASP.
فيما يلي خطوة مفصلة:
1. إنشاء DLL ActiveX جديد في VB.
2. الآن تحتاج إلى الرجوع إلى اثنين من DLL في VB.
الأول هو اقتباس DLL لمحرك ASP.
حدد أمر المشروع/المراجع من القائمة ، واقتبس من "مكتبة كائن Microsoft Active Server".
إذا لم تجدها ، فيمكنك العثور على دليل ASP.DLL ٪ SystemDirectory ٪/system32/inetsvr في الدليل التالي
انقر على الزر "تصفح ..." لاستيراد مكتبة الاتصال الديناميكية هذه
والثاني هو اقتباس كائن Microsoft Transaction Server (MTS).
"مكتبة نوع خادم Microsoft Type Server".
إذا لم تجدها ، فيمكنك العثور على ملف mtxas.dll هذا في الدليل التالي
٪ SystemDirectory ٪/system32/mts/
3. حسنًا ، يتم الانتهاء من جميع الاستعدادات ، وكيفية كتابة الرمز أدناه ، وأعتقد أن الجميع يمكنهم فهمه.
هذا هو رمز الملف:
الخيار صريح
dim m_objresponse كاستجابة
Dim M_ObjRequest كطلب
dim m_objserver كخادم
قاتمة m_objapplication كتطبيق
Dim M_ObjSession كجلسة
sub sub class_initialize ()
Dim ObjContext ككائن
تعيين OBJContext = getObjectContext ()
تعيين m_objresponse = objContext (استجابة)
تعيين m_objrequest = objContext (طلب)
تعيين m_objserver = objContext (خادم)
تعيين m_objapplication = objContext (التطبيق)
تعيين m_objsession = objContext (الجلسة)
نهاية الفرعية
النسب الفرعي العام ()
m_objresponse.write وداعا لمجلس الكتابة ، استخدم بيئة VB لكتابة برنامج ASP!
نهاية الفرعية
الصق الكود أعلاه في البرنامج الخاص بك ، ثم قم بتجميع هذا المشروع إلى DLL. الاستخدام النهائي
regsvr32 componentname.dll
سجل هذا DLL على IIS.
فيما يلي طريقة استخدام هذا المكون في ملف ASP:
& nbs
||تعيين كائن = server.createObject (yourprjname.asptest)
objtest.asptest
تعيين كائن = لا شيء
٪>
حسنًا ، آمل أن تتمكن طريقتي من حل محنة الأخ الأكبر ، هاها.