مثال على استخدام كائن القاموس Scripting.Dictionary في asp

تقدم هذه المقالة بشكل أساسي أمثلة لاستخدام كائنات قاموس Scripting.Dictionary في asp. تتضمن هذه المقالة عمليات مثل الإنشاء والتخصيص والاجتياز والحكم الرئيسي الذي يمكن للأصدقاء المحتاجين الرجوع إليه.

يقوم Scripting.Dictionary الخاص بـ vbscript بإنشاء كائن قاموس مشابه لفهرس المفاتيح المطابق لقيمة القيمة، ويقوم مباشرة بفهرسة القيمة المحددة من خلال المفتاح.

فيما يلي أمثلة لاستخدام Scripting.Dictionary في VBScript:

كائن خافت

تعيين objDict = WSH.CreateObject(Scripting.Dictionary)

' .إضافة (مفتاح، قيمة)

objDict.Add a، value1

objDict.Add b, value2

objDict.Add ج، value3

'فهرسة مباشرة إلى القيمة 2 من خلال المفتاح = ب

WSH.Echo objDict.Item(b)

objDict.Remove b 'حذف الفهرس b والقيمة المقابلة له

'ما يلي هو اجتياز القاموس

خافت objKeys، objItems، i

objKeys = objDict.Keys

objItems = objDict.Items

لأني = 0 إلى objDict.Count -1

مفتاح WSH.Echo= & objKeys(i) &_

AND Value= & objItems(i)

التالي

'تحديد ما إذا كان المفتاح المحدد موجودًا أم لا

إذا كان objDict.Exists(b) إذن

WSH.Echo وجدته

آخر

WSH.Echo غير موجود!

نهاية إذا

objDict.RemoveAll ' مسح كافة المفاتيح والقيم المقابلة لها في القاموس

تعيين objDict = لا شيء