Generer array med data via for..next løkke

Jeg er ikke helt med på hvad du efterspørger. Skal vare information over i et array fra et recordset?

Ja, vaeinfo hentes fra tabel over i et recordset og derefter sættes arrayets elemneter lig de tilhørende væderier i recordsettet.

Noget lige som det her :
...
    If Not rsItem.EOF Then
        arrCart(cProductid,scartItemj) = rsItem("catalogID")
        arrCart(cProductCode,scartItem) = rsItem("ccode")
        arrCart(cProductname,scartItem) = rsItem("cname")
        arrCart(cQuantity,scartItem) = CInt(quantity)
        arrCart(cUnitPrice,scartItem) = rsItem("cprice")
        arrCart(cFragt,scartItem) = CInt(fragt)
        Session("MyCart") = arrCart
...

Værdierne CInt(quantity) og CInt(fragt) hentes fra en formular.

Lukker spøgsmålet.