Ciao a tutti, sto prendendo confidenza con SQLite, ed ho un problemino: dopo aver popolato una DataTable da un file SQLite, edito i dati nella DataTable, e fi qui tutto funziona...
Il problema nasce quando voglio aggiornare il file coi dati ediati nella DataTable: il file non si aggiorna e non mi da nessun errore 
Ecco il codice:
Qui carico la DataTable:
Public Function LoadData(FullFileName As String, TableName As String) As DataTable
ct = String.Format("SELECT * FROM [{0}]", TableName)
con = New SQLiteConnection(String.Format("Data Source='{0}'", FullFileName))
Using cmd = New SQLiteCommand(ct, con)
con.Open()
Using dr As SQLiteDataReader = cmd.ExecuteReader
Dim dt = New DataTable(TableName)
dt.Load(dr)
con.Close()
Return dt
End Using
End Using
End Function
Qui edito i dati:
Public Sub TestEditData(ByRef dt As DataTable)
If dt IsNot Nothing Then
For i = 0 To 10
dt.Rows(i)(6) = Date.Now.Second + i
Next
dt.AcceptChanges()
End If
End Sub
E qui tento di salvare nuovamente i dati nel file SQLite:
Public Function SaveData(ByRef dt As DataTable) As Boolean
con.Open()
cmd = con.CreateCommand
cmd.CommandText = ct
da = New SQLiteDataAdapter(cmd)
Dim cb As New SQLiteCommandBuilder(da)
da.Update(dt)
con.Close()
Return True
End Function
E qui le uso:
Dim dt As DataTable
dt = LoadData(dfn, "myTable")
TestEditData(dt)
SaveData(dt)
Dimentico qualcosa?
Grazie e buone feste a tutti!