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

ASP
ASP基础讲座(下)
解决IIS5 HTTP500内部错误
ASP 3.0高级编程(四十六)
ASP 3.0高级编程(四十五)
ASP 3.0高级编程(四十四)
ASP 3.0高级编程(四十三)
ASP 3.0高级编程(四十二)
ASP 3.0高级编程(四十一)
ASP 3.0高级编程(三十九)
ASP 3.0高级编程(三十八)
ASP 3.0高级编程(三十七)
ASP 3.0高级编程(三十六)
ASP 3.0高级编程(三十五)
ASP 3.0高级编程(三十四)
ASP 3.0高级编程(三十三)
ASP 3.0高级编程(三十二)
ASP 3.0高级编程(三十一)
ASP错误代码说明
jscript错误代码及相应解释大全
ASP错误处理

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 68 ::
收藏到网摘: 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
%>