Sub Activity_Create(FirstTime As Boolean)
SQL.Initialize(File.DirDefaultExternal, "test.db", True)
SQL.ExecNonQuery("DROP TABLE IF EXISTS test")
SQL.ExecNonQuery("CREATE TABLE IF NOT EXISTS test(id INTEGER, number INTEGER)")
Dim id As Int
Dim number As Int
number = 4444
'inserting values
For i=1 To 10
SQL.ExecNonQuery2("INSERT INTO test VALUES(?,?,?)", Array As Object(i, number))
Next
'updating a subset of values
SQL.BeginTransaction
number =55555
For i=1 To 10
If i>=6 Then
SQL.ExecNonQuery2("UPDATE test SET number = ? WHERE id =?", Array As Object(number,i))
End If
Next
SQL.EndTransaction
'logging values from updated table
readqry = SQL.ExecQuery("SELECT id, number FROM test")
For i=1 To readqry.RowCount
readqry.Position = i-1
Log("id and number " & readqry.GetInt("id") & " " & readqry.GetString("number"))
Next
End Sub