当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp dictionary对象的用法

ASP
分享一段代码show.asp?id=26变成show/?26的形式
多域名一网站时如果返回最原来的域名
[原创]完美解决ASP 不能更新。数据库或对象为只读。
5天学会asp
TSYS中生成静态页时溢出: ''CInt''
对象标记具有无效的 ''MSWC.MyInfo'' ProgID
[原创]随机增加网站点击的一个不错的方法
Microsoft JET Database Engine 错误 ''80004005'' 未指定的错误的完美解决方法
反SPAM新思路—换Z-BLOG的验证码!
七步倒┈→专用asp后门
asp下实现代码的“运行代码”“复制代码”“保存代码”功能源码
使用ASP实现网站的“目录树”管理的代码
ShowPage 显示“上一页 下一页”等信息的封装代码
[原创]站长感慨asp编程究竟何去何从
响应对象 错误 ''ASP 0185 : 80020003'' 缺少默认属性
[原创]asp下用实现模板加载的的几种方法总结
[原创]asp获取URL参数的几种方法分析总结
Access数据库中“所有记录中均未找到搜索关键字”的解决方法
ASP程序中输出Excel文件实例一则
ASP应用中如何限制同一表单被多次提交

ASP 中的 asp dictionary对象的用法


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

关于script的dictionary对象,其实我想一开始ms是借鉴了python之类的动态脚本语言的,而且是面对客户端开发的关于这一点可以参考wrox的asp程序员参考手册里第137页里 如果在session级保存一个dictionary对象会降低系统的性能,而在application级保存一个dictionary对象会导致web服务器崩溃,关于这个就不在多说了。
现在我们要考虑的是dictionary对象在单页的时候,有哪些设计时的缺陷:
大家可以这么试试
set rs=server.createobject("adodb.recordset")
sql="select * from table"
rs.open sql,conn,1,3
set ttt=server.createobject("scripting.dictionary")
ttt.add "xxx",rs("field")
set rs=nothing
liu=ttt("xxx") '当你这么做的时候会发现一件什么事呢?asp页会告诉你发生意外!!!这个就很令人诧异了,什么是意外呢?很难说,后来经过我反复的测试发现是因为不能把rs("field")的值直接给dictionary对象,经过反复研究得出的结论是如下的:dictionry是把rs("field")的内存地址给储存了,这样的话,我刚才写的那个无疑是一种灾难,解决方法是把这个rs("field")放到一个变量里就可以解决了,但是dictionary对象难道不可以保存一个被nothing过的对象么?这个就是一个很大的疑问了,所以我又写了这么一段程序,大家可以保存成try.htm看看效果的
<script language='vbscript'>
set ttt=createobject("scripting.dictionary")
ttt.add "liu","uuu"
set ddd=createobject("scripting.dictionary")
ddd.add "ppp",ttt
set ttt=nothing
bbb=ddd("ppp")("liu")
alert(bbb)
</script>
结果是什么?你会发现一段alert了uuu说明是没有问题的,这就说明dictionary对象其实是把另一个
dictionary对象整个clone进来了,这就更验证了wrox的书中写的,dictionary对象在ms开发的时候其
实是针对客户端的,这种说法了
还有对数组与dictionary合用的代码也可以给大家看看的
<script language='vbscript'>
i=1
picname=("xxx")
str="set " & "pic_" & i & "=createobject(" & """" & "scripting.dictionary" & """" & ")"
execute(str)
str="pic_" & i & ".add " & """" & "picname" & """" & "," & """" & picname & """"
execute(str)
dim ttt()
redim ttt(5)
ttt(0)="uuu"
pic_1.add "item",ttt
liu=pic_1("picname")
set pic_2=createobject("scripting.dictionary")
erase ttt
redim ttt(5)
ttt(0)="iii"
nnn=pic_1("item")(0)
pic_2.add "rrr",ttt
zzz=pic_2("rrr")(0)
alert(liu)
alert(nnn)
alert(zzz)
</script>