Return to prepara_sql2.lua CVS log

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

Annotation of embedaddon/axTLS/www/lua/prepara_sql2.lua, revision 1.1.1.1

1.1       misho       1: #!/usr/local/bin/lua
                      2: 
                      3: MAX_ROWS = arg[1] or 10
                      4: 
                      5: require"postgres"
                      6: 
                      7: local env = assert (luasql.postgres ())
                      8: local conn = assert (env:connect ("luasql-test", "tomas"))
                      9: 
                     10: -- Apaga restos de outros testes.
                     11: conn:execute "drop table t2"
                     12: conn:execute "drop table t1"
                     13: 
                     14: -- Criando as tabelas.
                     15: assert (conn:execute [[create table t1 (
                     16:        a int,
                     17:        b int
                     18: )]])
                     19: assert (conn:execute [[create table t2 (
                     20:        c int,
                     21:        d int
                     22: )]])
                     23: 
                     24: -- Preenchedo as tabelas.
                     25: for i = 1, MAX_ROWS do
                     26:        local ii = 2*i
                     27:        assert (conn:execute (string.format ([[
                     28: insert into t1 values (%d, %d);
                     29: insert into t2 values (%d, %d);]],
                     30:                ii, i, ii, i)))
                     31: end