ASP - Se pierde el valor al recorrer un registro

Hola, Tengo un problema. El valor arra[i]= rs3("codimapa"); se pierde, no sé si es porque voy recorriendo la tabla, y cada vez se pierde el valor, pero quiero conservarlo en un array, y no sé como hacerlo.
Este es el código, a ver si alguien me puede ayudar.
Gracias!
Isabel

var strSQL3="SELECT * FROM mapusu WHERE dni='"+88876544+"' ";
var rs3 = connexio.Execute(strSQL3);

var i=0,j=0;
j=2*2;
arra = new Array(j);
for (i=0;i<j;i++)
{
arra[i]= 0;
}
i=0;
while (!rs3.EOF)
{
var strSQL4="SELECT * FROM mapa WHERE codimapa="+rs3("codimapa")+" ";
var rs4 = connexio.Execute(strSQL4);
%>
<tr>
<td> <input type="Radio" name="m" value="<%=rs3("codimapa") %> ">
<%= rs4("nom") %> </td>
</tr>
<%
arra[i]= rs3("codimapa"); i++;
arra[i]= rs4("nom");
i++;
rs3.MoveNext();
}
for (i=0;i<j;i++)
{
Response.write(arra[i]);
Response.write("<br>");
}