这篇文章主要介绍了asp中Scripting.Dictionary字典对象使用示例,本文包含创建、赋值、遍历、判断KEY等操作,需要的朋友可以参考下
vbscript的Scripting.Dictionary创建了类似于Key索引对应Value值的字典对象，通过Key直接索引到指定的Value。
VBScript中Scripting.Dictionary使用示例如下:
代码如下:
Dim objDict
Set objDict = WSH.CreateObject(“Scripting.Dictionary”)
‘ .Add(key, value)
objDict.Add “a”, “value1”
objDict.Add “b”, “value2”
objDict.Add “c”, “value3”
‘直接通过key=b索引到value2
WSH.Echo objDict.Item(“b”)
objDict.Remove “b” ‘ 删除索引b及其对应的值
‘ 以下是遍历字典
Dim
Set objDict = WSH.CreateObject(“Scripting.Dictionary”)
‘ .Add(key, value)
objDict.Add “a”, “value1”
objDict.Add “b”, “value2”
objDict.Add “c”, “value3”
‘直接通过key=b索引到value2
WSH.Echo objDict.Item(“b”)
objDict.Remove “b” ‘ 删除索引b及其对应的值
‘ 以下是遍历字典
Dim
来源gao!daima.com搞$代!码网
objKeys, objItems, i
objKeys = objDict.Keys
objItems = objDict.Items
For i = 0 To objDict.Count -1
WSH.Echo “Key=” & objKeys(i) &_
” AND Value=” & objItems(i)
Next
‘ 判断指定的key是否存在
If objDict.Exists(“b”) Then
WSH.Echo “Found it”
Else
WSH.Echo “Not Exists!”
End If
objDict.RemoveAll ‘ 清空字典内所有的key及其对应value
Set objDict = Nothing
以上就是asp中Scripting.Dictionary字典对象使用示例的详细内容，更多请关注gaodaima搞代码网其它相关文章！
搞代码网（gaodaima.com）提供的所有资源部分来自互联网，如果有侵犯您的版权或其他权益，请说明详细缘由并提供版权或权益证明然后发送到邮箱[email protected]，我们会在看到邮件的第一时间内为您处理，或直接联系QQ：872152909。本网站采用BY-NC-SA协议进行授权
转载请注明原文链接：asp中Scripting.Dictionary字典对象使用示例
转载请注明原文链接：asp中Scripting.Dictionary字典对象使用示例
