ReDim getrows()

Halløj i varmen !

Jeg vil gerne have mine billedenavne over i et array så jeg kan tjekke om de ligger fysisk på serveren.
Problemet er at jeg ikke har navnene på mine thumbnails gemt i databasen så jeg kan ikke få dem med i getrows() ved udtræk fra databasen.
(thumbs hedder alle det samme som billedet blot med "small_" foran)
jeg har sjuset mig frem til følgende med det fungere dog ikke ?

Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Open strDSN

    StrSql = "SELECT BilBilleder FROM Billeder WHERE BoeNo=1"
    Set rs = ObjConn.Execute(StrSql)
       
        if rs.EOF or rs.BOF then
        response.redirect("oversigt.asp")
        else
        ArrBilleder = rs.getrows()
        end if

    ObjConn.Close
    set ObjConn = Nothing

x = ubound(ArrBilleder, 2)

    for i = 0 to x
        ReDim Preserve ArrBilleder(0, i)
        ArrBilleder(0, i) = "small_"&ArrBilleder(0, i)
    next