موصى به: Flash مع ASP لإنشاء IP ، الإصدار ، وقت تسجيل الدخول ، عدد الزيارات لا أعرف ما إذا كان هذا أصليًا ، لكنني فعلت ذلك بنفسي دون الإشارة إلى أي شيء. أولاً ، تحتاج إلى ملفين ASP ، ملف نصي واحد ، وملف SWF واحد. ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
على الإنترنت ، عدادات مكتوبة في ASP موجودة في كل مكان. أعتقد أنه ليس من المنطقي التحدث عن عدادات كتابة ASP هنا. في وقت لاحق فكرت في الأمر وكان من الضروري التحدث عن ذلك ، لأن هذا لا يتعلق فقط بكتابة عدادات ، ولكن حول تقديم مهارات المعرفة والتطبيق ASP للجميع.
رمز البرنامج الأصلي كما يلي:
$#@60 ؛ ٪ countlong = 8
يحدد Countlong عدد البتات التي تظهرها العداد
عند استئناف الخطأ التالي
′ تجاهل كل الأخطاء
count = server.mappath ("count.txt")
set cou = server.createObject ("scripting.filesystemObject")
SET OUT = COU.OPENTEXTFILE (COUNT ، 1 ، FALSE ، FALSE)
عداد = Out.Readline
Out.close
′ الرمز أعلاه هو فتح ملفات الملفات وقراءة سطر لقراءة قيمة العداد الحالية
إذا كانت الجلسة (″ في ″) $#@60 ؛ $#@62 ؛ ″ في ″ ثم
′ حدد ما إذا كان المستخدم قد أدخل الصفحة الرئيسية لضمان عدم إضافة العداد بواسطة 1 عندما يضغط على التحديث أو يأتي إلى هذه الصفحة مرة أخرى.
الجلسة (″ في ″) = ″ في ″
SET OUT = COU.CREATETEXTFILE (العد ، صحيح ، خطأ)
application.lock
عداد = عداد+1
يزداد العداد بمقدار 1
Out.WriteLine (Counter)
application.unlock
Out.close
′ الرمز أعلاه هو إنشاء عدد جديد من ملفات count.txt وكتابة سطر ، واكتب قيمة العداد بعد إضافة 1.
إنهاء إذا
CO = CSTR (عداد)
تُستخدم وظيفة CSTR لتحويل المتغيرات الرقمية إلى حرف
ل I = 1 لعد LEN (CO)
استجابة. write ″ ″
التالي
′ بيان الحلقة أعلاه هو إكمال إضافة الصورة 0 أمام العداد
تحصل وظيفة LEN (CO) على طول CO المتغير ، CountLong-Len (CO) يحصل على عدد الصور 0 السابقة
لأني = 1 إلى لين (CO)
استجابة. write ″ ″
التالي
يتم استخدام وظيفة 'mid (co ، i ، 1) لقراءة حرف ٪ $#@62 من الجزء i-th من co المتغير ؛
العداد الأكثر نجاحًا هو استخدام الجلسة لمنع المستخدم من تحديث العداد عدة مرات ؛ استخدم الملفات النصية لتسجيل قيمة العداد. على الرغم من أن الكود مكتوب لفترة أطول ، إلا أنه أفضل بكثير من استخدام كائن التطبيق ، لأنه عندما يقوم الخادم بإعادة تشغيل أو تغييرات Global.asa ، سيتم مسح قيمة كائن التطبيق ؛ وكذلك استخدم الصور لاستبدال الأحرف ، والتي تبدو أكثر جمالا وسخاء!
يمكنك تصميم صورة العداد بنفسك ، واستخدام اسم الملف 0.GIF ، 1 يستخدم 1.GIF ، وهلم جرا.
مشاركة: 20 نصائح مفيدة للغاية في ASP 1.