高人帮忙求解,数组问题!
请大家帮一帮手解决!
问题:
Dim Data_Array '先定义一个公共变量
Dim CACHE
Set CACHE = new SETUPCLASS '定义类名
...
Data_Array(1,1)="ABC" '数组取值
CACHE.RELOADSETUP 1,1,"CBA" '改变它的变量,在类中的function执行
...
Class SETUPCLASS
...
Public Function RELOADSETUP(I,J,MyValue)
response.write RELOADSETUP(I,J) '能输出值
If Not IsArray(RELOADSETUP) Then Exit Function
RELOADSETUP(I,J) = MyValue
response.write "取值成功" '不能输出,可能在上一步已经退出function
End Function
...
End Class
在线等和UP,请帮忙!