บทความนี้จะแนะนำตัวอย่างการใช้ออบเจ็กต์พจนานุกรม Scripting.Dictionary ใน asp เป็นหลัก บทความนี้ประกอบด้วยการดำเนินการต่างๆ เช่น การสร้าง การมอบหมาย การสำรวจเส้นทาง และการตัดสินของเพื่อนๆ ที่ต้องการความช่วยเหลือ
Scripting.Dictionary ของ vbscript สร้างวัตถุพจนานุกรมที่คล้ายกับดัชนีคีย์ที่สอดคล้องกับค่า Value และจัดทำดัชนีโดยตรงไปยังค่าที่ระบุผ่านคีย์
ตัวอย่างการใช้ Scripting.Dictionary ใน VBScript มีดังนี้
คัดลอกรหัสรหัสดังต่อไปนี้:วัตถุสลัว
ตั้งค่า objDict = WSH.CreateObject (Scripting.Dictionary)
' .Add(คีย์, ค่า)
objDict.Add a, value1
objDict.Add b, value2
objDict.Add c, value3
'จัดทำดัชนีโดยตรงกับ value2 ผ่าน key=b
WSH.Echo objDict.Item(ข)
objDict.Remove b 'ลบดัชนี b และค่าที่เกี่ยวข้อง
'ต่อไปนี้คือการข้ามผ่านพจนานุกรม
Dim objKeys, objItems, i
objKeys = objDict.Keys
objItems = objDict.Items
สำหรับ i = 0 ถึง objDict.Count -1
WSH.Echo คีย์= & objKeys(i) &_
และค่า= & objItems(i)
ต่อไป
' ตรวจสอบว่ามีคีย์ที่ระบุอยู่หรือไม่
ถ้า objDict.Exists(b) แล้ว
WSH.Echo พบมัน
อื่น
WSH.Echo ไม่มีอยู่!
สิ้นสุดถ้า
objDict.RemoveAll ' ล้างคีย์ทั้งหมดและค่าที่เกี่ยวข้องในพจนานุกรม
ตั้ง objDict = ไม่มีเลย