Estraggo dei record da un database ma:
se ordino tutto per marca1 (order by marca1) va tutto bene mentre se ordino per prezzo1 (order by prezzo1) mi dà questo errore:

Errore di run-time di Microsoft VBScript (0x800A0009)
Indice non incluso nell'intervallo: 'i'

codice:
sql = "SELECT TOP 8 * FROM tabella order by prezzo1"

Set Rec = Server.CreateObject ("ADODB.Recordset")
Rec.Open sql, Conn, 3, 3

redim productID(8)
redim prezzo1(8)
redim marca1(8)

i = 0
do while not rec.eof
i = i + 1

productID(i)=rec("productID") 'l'errore lo dà a questo rigo ma anche se cancello il rigo lo darà al prossimo rigo
prezzo1(i) = rec("prezzo1")
marca1(i) = rec ("marca1")