System.Data.SQLite

Hello, i obtain this error using this code and i don't know if is a problem about database setting but it block my code:

"index was outside the bounds of the array"

and also i obtain this message at every query in the debug message list:

"SQLite warning (284)"

I would ask if can i solve in somes ways or is a bug. I run under XP SP3 and i run with this option: 

Flags=StickyHasRows;



this is sample code used... but an identical code in other function work well so i don't understand...


++++++++++++++++++++++++++++++++++
Dim ArrProdottiDaOrdinare() As Integer = {}

            Dim i As Integer = 0

 Call EstraiDatiAlVoloAutomation(SQLquery)

 If Dati.HasRows = True Then
                blnCeDaFareSoglieMinime = True
                ReDim ArrProdottiDaOrdinare(i)

                While Dati.Read() 'lettura ciclica
                    ReDim Preserve ArrProdottiDaOrdinare(i + 1)
                    ArrProdottiDaOrdinare(i) = CInt(Dati("IdProdotto"))
                    i = i + 1
                End While
                    Dati.Close()
            Else
                Exit Sub
            End If

            i = 0

The array index out of bounds error does not come from System.Data.SQLite.  The
warning message (284) means that SQLite used an automatic index (i.e. which means
that the database could probably benefit from additional indexes on the columns
involved).