Question

asp 变量定义出错

100分跪求！！！！各位高手们救救我

<%
Response.Charset="utf-8"

Dim node

Set objDom = Server.CreateObject("Microsoft.XMLDOM")
objDom.async = false
objDom.load(Server.MapPath("x1.xml"))
Set root = objDom.documentElement
dim kkk
a = 6
Dim Arr(6)
for kkk =0 to root.childNodes.length
Response.Write(root.selectSingleNode("//@item_url").text&"<BR>")

Arr(kkk)="baigal"
Response.Write(Arr(kkk)&"<BR>")
Response.Write(leng&"<BR>")

next

%>

我的代码是这种的
a = 6
Dim Arr(6)
可以显示
可是我换了
a = 6
Dim Arr(a)
这个就不显示了

Answer 1

是的，没有办法，系统就是这样规定的，数组定义里面的必须是常量，不可能使用dim arr(a)

但是，那个大小是不严格检查的，所以，所有的数组，你都可以下面这样定义
dim Arr(1)

定义1个元素就可以了，使用的存多少都没关系，系统知道自动扩充。

Answer 2

Dim Arr()
Redim Arr(a)