Array : non capisco . . .

[DarioN1]

dim tableCat
tableCat = array(rownum,6)
dim i

do while not rs.EOF

	TableCat(i,0) = "" & rs("codice") 
	TableCat(i,1) = "" & rs("descrizione")  'riga 107
	TableCat(i,2) = "" & rs("lingua")
	TableCat(i,3) = "" & rs("quantita_origine")
	TableCat(i,4) = "" & rs("quantita_residua")  
	TableCat(i,5) = "" & rs("giacenza")  
	
	rs.MoveNext
	i = i + 1
	
loop

Ci sto perdendo troppo tempo su sta roba

Come mai mi da :

Microsoft VBScript runtime error '800a0009'

Subscript out of range

/prgdario/cataloghibt/content/dettaglio_gen.asp, line 107

???

Mi sta martellando i maroni sta cosa

Help !

[DarioN1]

ah , ovviamente rownum è valorizzato . Nel mio esempio contiene 3 . . .

[Corwin]

dim tableCat
redim tableCat(rownum,6)'così è di 7 elementi, però.
dim i

do while not rs.EOF

TableCat(i,0) = "" & rs("codice")
TableCat(i,1) = "" & rs("descrizione") 'riga 107
TableCat(i,2) = "" & rs("lingua")
TableCat(i,3) = "" & rs("quantita_origine")
TableCat(i,4) = "" & rs("quantita_residua")
TableCat(i,5) = "" & rs("giacenza")

rs.MoveNext
i = i + 1

loop

[DarioN1]

tenkiu ! lunedi sul lavoro provo