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