Add get changes
This commit is contained in:
2
test.erl
2
test.erl
@@ -8,9 +8,11 @@ test() ->
|
||||
sqlite3:open(ct),
|
||||
sqlite3:create_table(ct, user, [{id, integer, [primary_key]}, {name, text}, {age, integer}, {wage, integer}]),
|
||||
[user] = sqlite3:list_tables(ct),
|
||||
0 = sqlite3:changes(ct),
|
||||
[{id, integer, [primary_key]}, {name, text}, {age, integer}, {wage, integer}] = sqlite3:table_info(ct, user),
|
||||
{rowid, Id1} = sqlite3:write(ct, user, [{name, "abby"}, {age, 20}, {wage, 2000}]),
|
||||
Id1 = 1,
|
||||
1 = sqlite3:changes(ct),
|
||||
{rowid, Id2} = sqlite3:write(ct, user, [{name, "marge"}, {age, 30}, {wage, 2000}]),
|
||||
Id2 = 2,
|
||||
[{columns, Columns}, {rows, Rows1}] = sqlite3:sql_exec(ct, "select * from user;"),
|
||||
|
||||
Reference in New Issue
Block a user