Ik wou een soort schoppingcat maken, maar het gaat net mis op het eind.
Let wel, ik heb geen ervaring met arrays en asp dus zal best eens een makkelijk probleem kunnen zijn.
Mijn IE geeft de volgende melding
En dan hier mijn code
Ik heb werkelijk geen idee, iemand die het probleem weet je verhelpen?
Let wel, ik heb geen ervaring met arrays en asp dus zal best eens een makkelijk probleem kunnen zijn.
Mijn IE geeft de volgende melding
code:
1
2
3
4
5
| Runtimefout Microsoft VBScript error '800a0009' Het subscript valt buiten het bereik: '1' /test/bestel.asp, line 38 |
En dan hier mijn code
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| Dim i
Dim rows
Dim myArray
reDim myArray(3,0)
If Not isEmpty(session("dwccart")) Then
myArray=Session("dwccart")
rows=UBound(myArray,2)+1
End If
reDim Preserve myArray(3,rows)
myArray(0,rows)=Rs("artNr")
myArray(1,rows)=1
myArray(2,rows)="test"
session("dwccart")=myArray
For i = LBound(myArray) To (UBound(myArray)-1)
Print myArray(0,i) & "-" ' DIT IS REGEL 38!
Print myArray(1,i) & "-"
Print myArray(2,i) & "<br>"
Next |
Ik heb werkelijk geen idee, iemand die het probleem weet je verhelpen?