genrere arra med vareinfo til indkøbkurv

Jeg har på en asp-side en sub som opretter et array med vareinfo til en indkøbskurv.

Dette array vises så på siden så brugeren kan slette, ændre i antal af varen osv.

Det går fint når der kun er 1 vare, men der skal nu kunne oprettes et nyt array med vareinfo til ikke bare 1 hovedvare, men også x antal tilbehørsvarer.

Dvs. at array, eller måske flere arrays, skal indeholde fra 1 til x antal varer med hver deres info.

PortefArr er et array med valgte vares produkt-id.
Dermed hentes hver vares info fra en database via det id.
---------------------------------------------------------
Foreløbig kode til varearray :

    Const cartAttributes = 10
    Const maxCartItems = 20
    ReDim arrCart(cartAttributes,maxCartItems)

    Session("MyCart") = arrCart
    Session("cartItem") = 0
     
    Dim j
    For j = 0 To UBound(PortefArr)

    arrCartj = Session("MyCart")
    scartItemj = Session("cartItem")

    sqlProductInfoj = "SELECT * FROM products WHERE "
    sqlProductInfoj = sqlProductInfoj & "(products.catalogID= "
    sqlProductInfoj = sqlProductInfoj & PortefArr(j)
    sqlProductInfoj = sqlProductInfoj & ");"

    call openConn()

    Set rsItemj = Server.CreateObject("ADODB.Recordset")
    rsItemj.Open sqlProductInfoj, dbc, adOpenForwardOnly,adLockReadOnly,adCmdText
    If Not rsItemj.EOF Then
        arrCartj(cProductidj,scartItemj) = rsItemj("catalogID")
        arrCartj(cProductCodej,scartItemj) = rsItemj("ccode")
        arrCartj(cProductnamej,scartItemj) = rsItemj("cname")
        arrCartj(cQuantityj,scartItemj) = CInt(quantity)
        arrCartj(cUnitPricej,scartItemj) = rsItemj("cprice")
        arrCartj(cFragtj,scartItemj) = CInt(fragt)
        Session("MyCart") = arrCartj
    End If
    rsItemj.Close
    set rsItemj = nothing
    Next
    call closeConn()
        End if
------------------------------------------------------

Problemer et at jeg ikke kan få tilføjet alle vareinfo, hovedvare + tilbehørsvarer, for dermed at kunne vise dem på asp-siden i en tabel.

Hvad skal ændres/rettes i ovenværende kode????