asp怎样定义一个二维数组？

dim aa(2,2)

aa(0,0) = "00"

aa(0,1) = "01"

aa(1,0) = "10"

aa(1,1) = "11"

aa(2,1) = "21"

aa(2,2) = "22"

response.Write aa(2,1)

<%

action=trim(request("action"))

select case action

case "update"

j = request.form("id").count

for i=1 to request.form("id").count

id=replace(request.form("id")(i),"'","")

a=replace(request.form("a")(i),"'","") '次数

b=replace(request.form("b")(i),"'","") '小计

conn.execute("update 表 set a="&a&",b="&b&" where id="&id)

next

conn.close

set conn=nothing

response.Redirect "index.asp"

response.End

end select %>

<form name="chkform" method="post" action="index.asp">

调用查询略rs......

<input type="text" name="a" size="6" value="<%=rs("a") %>">

<input type="text" name="b" size="6" value="<%=rs("b") %>">

<input type="hidden" name="id" value="<%=rs("id")%>">

<INPUT type="button" value="更新商品！" onclick="document.chkform.action.value='update'document.chkform.submit()">

</form>

<%

rs.movenext

loop

rs.close

set rs=nothing

%>

---