当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp利用dictionary创建二维数组

ASP
asp搜索两个以上的词的原理
如何使用花生壳?
asp汉字转换成汉语拼音代码
asp程序实现伪静态的代码
asp处理xml数据的发送、接收类
ASP中使用jmail发送邮件的函数
asp中获取字符串中的时间字符串
ASP按照字数限制自动截取标题内容
asp中将内容生成word文档的函数
用ASP自动清空IE缓存里的内容
asp检测conn.execute是否执行成功的函数
自动获取当前页面URL的ASP函数
ASP采集中获取网页内所需的html代码
asp图片采集并且本地重命名保存的函数
如何使用asp去字符串中的超链接
asp网站通过限制请求防止被采集的函数
asp利用正则去掉字符串中所有html内容
用ASP取出HTML里面的图片地址的函数
fso实现整个文件夹内容的复制到另一个文件夹中
适合所有表的添加、删除、修改的函数

ASP 中的 asp利用dictionary创建二维数组


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

这是asp利用dictionary创建二维数组的例子,这样做的优点是:

1、数组下标可以是字符串

2、长度不是固定的


<%
’=========================================== 
’ 功能:创建动态二维数组且数组下标可以是字符串 
’ 作者:wangsdong 
’ 网站: http://www.aspprogram.cn 
’ 文章为作者原创,转载请注明文章出处、保留作者信息,谢谢支持! 
’===========================================
Set a1 = CreateObject("scripting.dictionary")
For i=1 To 9
  Set a2 = CreateObject("scripting.dictionary")
  For j=1 To 12
     a2.add CStr("aaa"&j),CStr("b"&i&"b"&j*10)
  Next
  a1.add ("bbb"&i),a2
  Set a2=Nothing
Next
For i=1 To 9
  For j=1 To 12
   acs=a1("bbb"&i)("aaa"&j)
   response.write acs&"&nbsp;&nbsp;&nbsp;&nbsp;"
  Next
  response.write "<Br>"
Next
response.end
Set a1=Nothing
%>