如何给application中的数组赋值

[netdust]

下面的代码输出为1，而不是2，怎么办呢？

<%
dim a(0)
a(0)=1
application("b")=a
application("b")(0)=2
response.write application("b")(0)
%>

[笨笨兔兔兔兔兔]

<%
dim a(0)
a(0)=1
application("b")=a
b=application("b")
b(0)=2
application("b")=b
response.write application("b")(0)
%>

[netdust]

这样倒是行，如果不使用b，可以直接操作吗？

因为现在有这样一个问题，我使用动态数组放在application里，使用b的话无法实现变长（除非用循环遍历着倒出去）

[笨笨兔兔兔兔兔]

没看明白

[meizz]

application 里存放着数组的引用而非数组本身，所以兔子的代码没有问题的呀！

[cueixu1]

必须通过一个变量中转，不能使用application或者SESSION直接进行数组性操作。没有效果的~~
我曾经尝试过了。。。

[netdust]

例如这样：
<%
redim a(10)
a(0)=2
'.....
application("b")=a
'现在想把application里的数组长度加一，怎么办呢？ 多些 ^_^
%>

[meizz]

<%
redim a(10)
a(0)=2
'.....
application("b")=a

dim b : b = application("b")
ReDim Preserve b(ubound(b)+1)
application("b") = b
response.write ubound(application("b"))
'现在想把application里的数组长度加一，怎么办呢？ 多些 ^_^
%>

[netdust]

实在不好意思哈，上面的代码能通过，不过我现在使用的是二维的，把上面的代码改为二维的就提示‘下标越界’

redim a(10) --> redim a(10,1)

[netdust]

<%
redim a(10,1)
'a(0)=2
'.....
application("b")=a
'现在想把application里的数组长度加一，怎么办呢？ 多些 ^_^
%>

[netdust]

刚刚看到的资料：
如果使用了 Preserve 关键字，就只能调整数组最后维的大小，并且不能改变数组的维数。

谢谢大家了