ASP Arrays

[KaY.NL]

Beste mensen,

Waarom krijg ik met onderstaande code dat de melding dat het subscript buiten bereik valt? Het gaat mis bij deze regel:

Redim Preserve cart(i,1)

Wie kan mij helpen?

Alvast bedankt!

pid = Request("pid")

Dim i

cart = Session("cart")

i = 0
If IsArray(cart) Then
For Each item IN cart
i = i + 1
Next
End If

If i > 0 Then 'ja
	i = UBound(cart,1)
	i = i + 1
	Redim Preserve cart(i,1)
	cart(i,1) = pid
	cart(i,0) = 1	
Else 'er is nog niets besteld
	Redim cart(0,1)
	cart(0,1) = pid
	cart(0,0) = 1 'aantal
End If

Session("cart") = cart

 

[KaY.NL]

Ik heb het al gevonden

Ik moest columns en rows omdraaien. Een array ziet er zo uit: array(cols,rows) en niet andersom.