Return to prepara_sql2.lua CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / axTLS / www / lua

axTLS

#!/usr/local/bin/lua

MAX_ROWS = arg[1] or 10

require"postgres"

local env = assert (luasql.postgres ())
local conn = assert (env:connect ("luasql-test", "tomas"))

-- Apaga restos de outros testes.
conn:execute "drop table t2"
conn:execute "drop table t1"

-- Criando as tabelas.
assert (conn:execute [[create table t1 (
	a int,
	b int
)]])
assert (conn:execute [[create table t2 (
	c int,
	d int
)]])

-- Preenchedo as tabelas.
for i = 1, MAX_ROWS do
	local ii = 2*i
	assert (conn:execute (string.format ([[
insert into t1 values (%d, %d);
insert into t2 values (%d, %d);]],
		ii, i, ii, i)))
end