bhe, a parte che in realtà se la grandezza dell'array dipende da quanti record vengono estratti...di conseguenza sapresti già anke quanto è grand l'array...cmq... se usi getrows ti valorizza automaticamente un array bidimensionale con il tuo recordset...vedi se può far al caso tuo...

Set rs=ConnDB.Execute(sql)

if not rs.eof then
bufferdata = rs.getrows
numcols = ubound(bufferdata, 1)
numrows = ubound(bufferdata, 2)
end if

rs.close()
Set rs=Nothing