当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP实例教程:Dictionary对象

ASP
简单ASP论坛DIY
如何防止页面中的敏感信息被提取
asp创建对象及中文显示解决技巧
基础开发入门级:JSP与ASP的比较
数据库受到限制怎么办?
ASP初学者常犯的几个错误
Asp定时执行操作、Asp定时读取数据库(网页定时操作详解)
ASP优化:非常实用的ASP提速技巧五则
ASP教程:解决ASP脚本运行超时的方法
ASP安全:简单学习ASP连接数据库方法
简单一招用ASP实现对IE地址栏参数的判断
asp控制xml数据库的6段非常的经典代码
ASP进阶:验证身份证号是否正确的代码
ASP教程:使用ASP生成图片彩色校验码
ASP进阶:用ASP判断文件地址是否有效
ASP进阶:用asp做的简单搜索引擎代码
ASP实例 挂QQ的网页源代码ASP/PHP
ASP答疑 解决ASP脚本运行超时的方法
轻轻松松破解开别人ASP木马密码的方法
用ASP操作Access数据库 ADOX的使用

ASP实例教程:Dictionary对象


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-28   浏览: 77 ::
收藏到网摘: n/a

Dictionary 对象

指定的键存在吗?

本例演示如何受首先创建一个Dictionary对象,然后使用Exists方法来检查指定的键是否存在。

本实例代码如下:

<html>
<body>
<%
dim d
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
if d.Exists("c")= true then
    Response.Write("键存在。")
else
    Response.Write("键不存在。")
end if
set d=nothing
%>
</body>
</html>

本文由软晨学习网(http://www.ruanchen.com)整理发布!转载请注明出处,谢谢!

本实例运行结果如下:

 键存在。

返回一个所有项目的数组

本例演示如何使用Items方法来返回所有项目的一个数组。

本实例代码如下:

<html>
<body>
<%
dim d,a,i,s
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("<p>项目的值是:</p>")
a=d.Items
for i = 0 To d.Count -1
    s = s & a(i) & "<br>"
next
Response.Write(s)
set d=nothing
%>
</body>
</html>

本实例运行结果如下:

 项目的值是:
China
Italy

返回一个所有键的数组

本例演示如何使用Keys方法来返回所有键的一个数组。

本实例代码如下:

<html>
<body>
<%
dim d,a,i,s
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("<p>键的值是:</p>")
a=d.Keys
for i = 0 To d.Count -1
    s = s & a(i) & "<br>"
next
Response.Write(s)
set d=nothing
%>
</body>
</html>

本实例运行结果如下:

键的值是:
c
i

返回某个项目的值

本例演示如何使用Item属性来返回某个项目的值。

本实例代码如下:

<html>
<body>
<%
dim d
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("项目 i 的值是:" & d.item("i"))
set d=nothing
%>
</body>
</html>

本实例运行结果如下:

项目 i 的值是:Italy

设置一个键

本例演示如何使用Key属性来在Dictionary对象中设置一个键。

本实例代码如下:

<html>
<body>
<%
dim d
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
d.Key("i") = "it"
Response.Write("键 i 已设置为 it,其值是:" & d.Item("it"))
set d=nothing
%>
</body>
</html>

本实例运行结果如下:

键 i 已设置为 it,其值是:Italy

返回键/项目对的数目

本例演示如何使用Count属性来返回键/项目对的数目。

本实例代码如下:

<html>
<body>
<%
dim d, a, s, i
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("key/item 对的数目是:" & d.Count)
set d=nothing
%>
</body>
</html>

本实例运行结果如下:

key/item 对的数目是:2