asp利用dictionary创建二维数组

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

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

2、长度不是固定的

<%
’===========================================
’ 功能：创建动态二维数组且数组下标可以是字符串
’ 作者：wangsdong
’ 网站:
’ 文章为作者原创，转载请注明文章出处、保留作者信息，谢谢支持！
’===========================================
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&"    "
  Next
  response.write "<Br>"
Next
response.end
Set a1=Nothing
%>