mirror of
https://github.com/etlegacy/etlegacy-libs.git
synced 2024-11-14 16:41:24 +00:00
40 lines
1.1 KiB
Lua
40 lines
1.1 KiB
Lua
-- See Copyright Notice in license.html
|
|
|
|
-- load driver
|
|
require"luasql.postgres"
|
|
-- create environment object
|
|
env = assert (luasql.postgres())
|
|
-- connect to data source
|
|
con = assert (env:connect("luasql-test"))
|
|
-- reset our table
|
|
res = con:execute"DROP TABLE people"
|
|
res = assert (con:execute[[
|
|
CREATE TABLE people(
|
|
name varchar(50),
|
|
email varchar(50)
|
|
)
|
|
]])
|
|
-- add a few elements
|
|
list = {
|
|
{ name="Jose das Couves", email="jose@couves.com", },
|
|
{ name="Manoel Joaquim", email="manoel.joaquim@cafundo.com", },
|
|
{ name="Maria das Dores", email="maria@dores.com", },
|
|
}
|
|
for i, p in pairs (list) do
|
|
res = assert (con:execute(string.format([[
|
|
INSERT INTO people
|
|
VALUES ('%s', '%s')]], p.name, p.email)
|
|
))
|
|
end
|
|
-- retrieve a cursor
|
|
cur = assert (con:execute"SELECT name, email from people")
|
|
-- print all rows
|
|
row = cur:fetch ({}, "a") -- the rows will be indexed by field names
|
|
while row do
|
|
print(string.format("Name: %s, E-mail: %s", row.name, row.email))
|
|
row = cur:fetch (row, "a") -- reusing the table of results
|
|
end
|
|
-- close everything
|
|
cur:close()
|
|
con:close()
|
|
env:close()
|