Some examples of tcl and sqlite usage:
NOTE: the name of the database is opendb
set tableNames [opendb eval {SELECT tbl_name FROM sqlite_master}] puts $tableNames
opendb eval "SELECT * FROM $tableName LIMIT 1" x {set columnName $x(*)} puts $columnName
jnc You can also use the PRAGMA statement table_info(table_name) to retrieve column information. See http://sqlite.org/pragma.html for a list of all PRAGMA statements.
set columns [opendb eval "PRAGMA table_info($tableName)"] puts $columns
opendb eval "Select * FROM $i" values { set columnNames $values(*) foreach column $columnNames { set rowList $values($column) } puts $rowValues }