مستحسن: يقوم Asp بإنشاء سلسلة عشوائية مكونة من 13 رقمًا html title /title body % Functiongen_key(digits) 'تحديد وتهيئة المصفوفة dimchar_array(80) 'تهيئة الأرقام Fori=0To9 char_array(i)=CStr(i) التالي 'تهيئة الأحرف الكبيرة Fori=10To35 char_array(i)= Chr(i +55) التالي 'تهيئة الأحرف الصغيرة Fori=36To61 char_array(i)=Chr
يمكن أن يؤدي تخزين البيانات باستخدام سلاسل الفاصل الزمني إلى تقليل عدد حقول قاعدة البيانات المراد كتابتها، كما يسهل أيضًا توسيع البيانات في المستقبل.على سبيل المثال: في المنتدى، شخصية المستخدم متعددة الشخصيات، متفائلة، ناضجة وثابتة، طفولية و شقية، لطيفة و متفهمة، الخ. القيم المقابلة لها هي 0، 1، 2، 3، 4 على التوالي عند تخزين هذه البيانات، قم بتخزين البيانات في حقل نصي. تنسيق تخزين البيانات هو: 0|2|3|4|.
عند استخدام سلاسل الفاصل الزمني لفصل البيانات المختلفة، فإن الحد الأقصى لقيمة الخط المنخفض للمصفوفة التي يتم إنشاؤها عند فصل 0|2|3|4| و0|2|3|4 باستخدام وظيفة التقسيم غالبًا ما يكون مختلفًا انتبه، ستتم كتابة مسافة إضافية في أقصى اليمين. بهذه الطريقة، سيتم اجتياز جزء آخر من البيانات عند الإخراج لتجنب هذا الموقف، يجب اكتشاف السلسلة.
فكرة:
1. تحقق مما إذا كانت هناك سلسلة فاصلة على الجانب الأيمن، إذا كانت موجودة، فأنت بحاجة إلى تقليل الحد الأقصى لقيمة الخط السفلي للمصفوفة بمقدار واحد.
2. إذا لم يكن موجودًا، قم بإرجاع الحد الأقصى للصفيف الأصلي مباشرةً.
شفرة:
DimTempStr,TempArr,TempItem
TempStr=العنصر الأول 1|العنصر الثاني 1|العنصر الثالث|
TempArr=Split(TempStr,|)
Response.WriteTempStr&<br/>
ForTempItem=0ToUBoundStrToArr(TempStr,UBound(TempArr),|)
Response.WriteTempArr(TempItem)&<br/>
التالي
'************************
'الوظيفة: UBoundStrToArr
'الوظيفة: اكتشاف الحد الأقصى لقيمة الخط الأصلي للسلسلة الأصلية المحولة إلى مصفوفة
'المعلمة: cCheckStr (السلسلة التي سيتم اكتشافها)
'cUBoundArr (ينشئ الحد الأقصى لقيمة الخط السفلي للصفيف)
'cSpaceStr (سلسلة التباعد)
'الإرجاع: الحد الأقصى لقيمة الخط السفلي للمصفوفة
'************************
PublicFunctionUBoundStrToArr(ByValcCheckStr,ByValcUBoundArr,ByValcSpaceStr)
IfInstr(cCheckStr,cSpaceStr)=0ثم
UBoundStrToArr=cUBoundArr
وظيفة الخروج
EndIf
DimTempSpaceStr,UBoundValue
TempSpaceStr=Mid(cCheckStr,Len(cCheckStr)-Len(cSpaceStr)+1)' احصل على حرف المسافة على الجانب الأيمن من السلسلة
IfTempSpaceStr=cSpaceStrThen'إذا كان هناك حرف مسافة في أقصى الجانب الأيمن من السلسلة، فيجب أن تكون قيمة الحرف المنخفض -1
UBoundValue=cUBoundArr-1
آخر
UBoundValue=cUBoundArr
EndIf
UBoundStrToArr=UBoundValue
وظيفة النهاية
المشاركة: يجعل ASP+AJAX مطالبات البحث مشابهة لـ Google الملفات الرئيسية هي: يقوم Index.html بتنفيذ الوظيفة ومربع النص وإدخال المحتوى وتنفيذ وظيفة الاستعلام search.asp السريعة، ويسمح بالاستعلام عن المحتوى الذي تم إدخاله في مربع النص في قاعدة البيانات، ثم يعيده إلى العميل يتم تنفيذ وظيفة اتصال قاعدة البيانات conn.asp الجزء الأساسي من xmlhttp.jsAJAX متصل بقاعدة البيانات ويستخدم لنقل بيانات العميل إلى الخادم ثم نقل بيانات الخادم إلى الخادم.