Ik krijg de volgende foutmelding en ik zal niet weten hoe ik dit moet oplossen
foutmelding :
Microsoft VBScript runtime error '800a0009'
Subscript out of range: 'intT'
wijzig.asp, line 17
Code lijn 8-17
08 dbGrootte = rsParent.RecordCount-1
09 Dim arrParents()
10 ReDim Preserve arrParents(dbGrootte)
11 Dim intT
12 intT = 0
13
14 If( rsParent.RecordCount <> 0 ) Then
15
16 While Not rsParent.Eof Or rsParent.Bof
17 arrParents(intT) = rsParent(0)&","&rsParent(2)
Iemand ook dit probleem gehad of weet je wat ik fout doe?
foutmelding :
Microsoft VBScript runtime error '800a0009'
Subscript out of range: 'intT'
wijzig.asp, line 17
Code lijn 8-17
08 dbGrootte = rsParent.RecordCount-1
09 Dim arrParents()
10 ReDim Preserve arrParents(dbGrootte)
11 Dim intT
12 intT = 0
13
14 If( rsParent.RecordCount <> 0 ) Then
15
16 While Not rsParent.Eof Or rsParent.Bof
17 arrParents(intT) = rsParent(0)&","&rsParent(2)
Iemand ook dit probleem gehad of weet je wat ik fout doe?