动态声明数组维数

一般是 Dim 后 再 ReDim 的 ReDim 是重新分配的 传说效率不高

这里给出另一个方法 效率未知 只是参考

有兴趣的可以去参阅 Execute 的有关资料

<%
Dim upperbound : upperbound = 3
Execute("Dim TestArray("& upperbound &")")
Response.Write(Ubound(TestArray))
Call Erase(TestArray)
%>