¿Cómo enviar un array mediante ajax?

[Adler]

Hola

No entiendo por que redimensionas el array a 10000
Redim arreg(10000)
cuando solomente traes 10 registros de tu consulta
SELECT TOP 10

Cambia a esto

<input type="hidden" name="arreg[]" id="arreg[]" value="<%=arreg(i)%>" >

En esta función

function verificaUsuario()
{
if (!enProceso && http)
{
elemento = 'arreg[]';
frm = document.formulario;
valor = new Array();
for (var i = 0, total = frm[elemento]; i < total; i++) {
valor[valor.length] = escape(frm[elemento][i].value);
}


var url = "proceso.asp?nombre_carpeta="+ valor.join(",");
http.open("GET", url, true);
http.onreadystatechange = handleHttpResponse;
enProceso = true;
http.send(null);
}
}

Saca el form del while y dale un nombre

<form name="formulario">
<%
Ors.open "SELECT TOP 10 A.Id, A.Archivo FROM C_MATERIAL A LEFT JOIN C_CURSOS B ON (A.id = B.id) WHERE (YEAR(A.fechainicio) >= 2009) AND A.Id NOT IN (Select Id_Archivo From X_Respaldo) GROUP BY A.Id, Archivo ORDER BY Archivo", Conn
Do While not Ors.eof
.......

Loop
Ors.Close
set fs=nothing
%>
</form>

Suerte