只有在 TDBC::SQLite3 上測試過。目前可以拿到 table columns 的 type 資料，而 resultset 只傳回來 columns name list，利用 table columns 的 type 資料傳回一份對照表。
proc getColumnsType {COLUMNS TABLE_COLUMNS} {
puts $COLUMNS
puts $TABLE_COLUMNS
set result [dict create]
foreach column $COLUMNS {
set column_2 [string tolower $column]
set res [dict get $TABLE_COLUMNS $column_2]
set type [dict get $res type]
dict set result $column $type
}
return $result
}
set table_columns [db columns mylist]
set statement [db prepare {SELECT * FROM mylist}]
set resultset [$statement execute]
set res_columns [$resultset columns]
# test method
puts [getColumnType $res_columns $table_columns]
$statement close
我想我搞懂問題點在哪裡了。如果我操作超過一個表格，那該怎麼做？
如果有時間，我寫一份 TDBC 某個 driver 的研究看看 TDBC 的機制，然後再思考看看該怎麼做。
更新：
看起來我目前不會有操作超過一個表格要 get column type 的情況，所以我想…… 如果有需要再研究好了。
更新：
目前來看，TDBC 實作的策略可以分為二個。
第一個策略，建立 stubs 以後，運用 Tcl 8.6 Tcl_LoadFile，使用 database API
第二個策略，使用原有的 Tcl 套件，然後加上一層 TDBC interface
tdbc::connection
連線到 database, database tables and table columns, primary key..., etc meta data
tdbc::statement
當使用者使用 tdbc::connection prepare 函式，就會建立一個 tdbc::statement 物件。
建立物件時就會使用 tdbc::tokenize (Tcl code) 或者是 Tdbc_TokenizeSql 找出來使用者變數，然後使用 ? （或者是 SQL 語法接受的）取代使用者變數產生 params （有 type 等資料）並且產生 database 可以接受的 SQL 字串
但是這並不是 SQL 語法分析，只是找出 : 或者是 $ 開頭的字串。
tdbc::resultset
當使用者使用 statement object execute method 或者是其它的 command 會觸發 execute method 時就會建立一個 tdbc::resultset 物件。
在建立的時候，就會使用 params 的資料與取得使用者所連結的變數，真正的執行並且取得結果。
So...
如果真的有需要的話，應該是要更改 resultset 相關的部份，另外還要考慮如果不支援這樣操作的資料庫應該要怎麼做。
