asp利用dictionary建立二維數組

這是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
%>