如何检查表中是否存在变量？ TCL

Question

我对这种语言很陌生，需要一些帮助。我想要通过/发送电子邮件变量，看看它是否存在于数据库表中？

'proc: TEST::TestingFunc {ArrayName}{
 upvar #0 $ArrayName Param
   if {[info exists Param(data)]} {
        set email $Param(data)
      }
}'

Answer 1

这不是答案，我只需要格式化功能才能编写此注释。您不清楚要问什么或想要做什么。如果要检查在给定的关联数组中是否存在名为data的成员并获取其值，则发布的代码似乎大部分都可以。代码中有几个错误：它应该看起来像这样

proc TEST::TestingFunc {ArrayName} {
    upvar #0 $ArrayName Param
    if {[info exists Param(data)]} {
        set email $Param(data)
    }
}

要使其正常工作，还需要创建一个名为TEST的命名空间。

除此之外，我不确定您想做什么。 “通过/发送”是什么意思？您是在说“数据库表”是关联数组，还是其他意思？