Ciao a tutti,
mi succede una cosa strana, come da titolo del Thread dopo aver lanciato il comando di chiusura di un DB access mi rimane il file .ldb
E' come se il DB non sia stato chiuso.

Per connettermi utilizzo il seguente codice:

codice:
Dim strconn As String
strconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MyPath & "\" & NomeDB
conn = New OleDbConnection(strconn)
conn.Open()
Per disconnettermi utilizzo il seguente codice:

codice:
conn.Close()
conn.Dispose()
La cosa strana è che per la maggior parte del mio applicativo utilizzando la connessione e successivamente la disconnessione il problema non si presenta.

Il problema si presenta quando effettuo un ciclo come questo:

codice:
'apre la connessione
        Connetti()

       'Query parametrizzata

            For cnt = 1 To 500
                comm = New OleDbCommand("UPDATE Tag SET " & _
                                        "nPagina=@nPagina," & _
                                        "Visibile=@Visibile," & _
                                        "TipoDato=@TipoDato," & _
                                        "Titolo=@Titolo," & _
                                        "X=@X," & _
                                        "Y=@Y," & _
                                        "Larghezza=@Larghezza," & _
                                        "Altezza=@Altezza," & _
                                        "Trasparente=@Trasparente," & _
                                        "Bordo=@Bordo," & _
                                        "NomeFont=@NomeFont," & _
                                        "StileFont=@StileFont," & _
                                        "DimensioneFont=@DimensioneFont," & _
                                        "Allineamento=@Allineamento " & _
                                        "WHERE nTAG=@nTAG AND " & condizioneQUERY & ";", conn)

                comm.Parameters.Add("@nPagina", OleDb.OleDbType.VarChar).Value = frmTAG.txtNPagina.Text
                comm.Parameters.Add("@Visibile", OleDb.OleDbType.Boolean).Value = frmTAG.Visibile(cnt)
                comm.Parameters.Add("@TipoDato", OleDb.OleDbType.VarChar).Value = frmTAG.TipoDato(cnt)
                comm.Parameters.Add("@Titolo", OleDb.OleDbType.VarChar).Value = frmTAG.Titolo(cnt)
                comm.Parameters.Add("@X", OleDb.OleDbType.VarChar).Value = frmTAG.X(cnt)
                comm.Parameters.Add("@Y", OleDb.OleDbType.VarChar).Value = frmTAG.Y(cnt)
                comm.Parameters.Add("@Larghezza", OleDb.OleDbType.VarChar).Value = frmTAG.Larghezza(cnt)
                comm.Parameters.Add("@Altezza", OleDb.OleDbType.VarChar).Value = frmTAG.Altezza(cnt)
                comm.Parameters.Add("@Trasparente", OleDb.OleDbType.Boolean).Value = frmTAG.Trasparente(cnt)
                comm.Parameters.Add("@Bordo", OleDb.OleDbType.Boolean).Value = frmTAG.Bordo(cnt)
                comm.Parameters.Add("@NomeFont", OleDb.OleDbType.VarChar).Value = frmTAG.NomeFont(cnt)
                comm.Parameters.Add("@StileFont", OleDb.OleDbType.VarChar).Value = frmTAG.StileFont(cnt)
                comm.Parameters.Add("@DimensioneFont", OleDb.OleDbType.VarChar).Value = frmTAG.DimensioneFont(cnt)
                comm.Parameters.Add("@Allineamento", OleDb.OleDbType.VarChar).Value = frmTAG.Allineamento(cnt)
                comm.Parameters.Add("@nTAG", OleDb.OleDbType.VarChar).Value = cnt

                comm.ExecuteNonQuery()
            Next
        End If

        'chiude la connessione al database
        Disconnetti()
Altra info: se i cicli FOR li diminuisco a 100 non ho più il problema

Avete idee ???

Grazie, BOC