在tcl数据库中插入值

Question

我在tcl：

中向此数据库添加内容时遇到问题

  set fd [open country.txt]
  set content [read $fd]
  close $fd
  set qcontent [string map {' ''} $content]
  db eval "INSERT INTO t1 VALUES(1,2,'$content')"

仍然没有添加请求的值。

Answer 1

你应该使用大括号来避免处理单引号：

set fd [open country.txt]
set content [read $fd]
close $fd
db eval {INSERT INTO t1 VALUES(1,2,$content)}

既然你不需要逃避单引号，你就会减少变量并减少错误。

Answer 2

db eval "INSERT INTO t1 VALUES(1,2,'$qcontent')"

应该是要评估的qcontent变量。