使用Tcl和sqlite为SQL事务生成命令

Question

我无法理解如何在列表中创建SQL命令批处理并将其传递给sqlite以便在事务中执行。

基本上我现在所做的是：

sqlite3 db1 $dbFile
db1 eval BEGIN
foreach Key [array names myArray] {
    db1 eval {SQL statement involving $Key}
}
db1 eval COMMIT

我在考虑使用SQL INSERT生成列表然后将其传递给 db1 transaction 或 db1 eval 的方法，但这对我来说似乎不起作用。也许我只是犯了一些stupin语法错误。有人有一个有效的例子吗？

谢谢！

Answer 1

我对“愚蠢的错误”是正确的。

db1 transaction {
    foreach Key [array names myArray] {
        db1 eval {SQL statement involving $Key}
    }
}