<% for i = 0 to ubound(arr) redim preserve nuevo_arr(ubound(arr)) nuevo_arr(ubound(arr) - i) = arr(i) next %>