Utiliza el metodo GetRows del objeto recordset, asumiendo que tienes ya una conexion activa, llamada ObjConn:
Código:
SQL = "SELECT campo from tabla"
Set rs = Server.createObject("ADODB.Recordset")
rs.Open SQL, ObjConn, 3, 3
if not rs.EOF then
ds = rs.GetRows()
else
ds = ""
end if
Set rs = Nothing
Despues iteras tu ds si es array y listo
Salu2,