以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  ft中如何获取标量值函数返回的值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139839)
--  作者：happyft
--  发布时间：2019/8/22 19:47:00
--  ft中如何获取标量值函数返回的值
如下面的代码
 Dim cmd As New SQLCommand
 cmd.ConnectionName = Mydata
  cmd.CommandText = "select dbo.ufnV_BU_cgd(\'" & e.DataRow("来源单号") & "\')"
  If cmd.ExecuteScalar() > "" Then
      Dim pr As Row = Tables(winName & "_主表").Current
      pr("事业部名称") = cmd.ExecuteScalar()
  End If

上面红色的代码在sql中是可以正确返回一个值的,但在ft中要如何写才直接用这个值来给某个字段赋值?
上面的写法什么也没有,也不出错
谢谢!
--  作者：有点蓝
--  发布时间：2019/8/23 9:32:00
--  
ExecuteScalar不需要调用2次

If Tables(winName & "_主表").Current IsNot Nothing Then
    Dim cmd As New SQLCommand
    cmd.ConnectionName = Mydata
    cmd.CommandText = "select dbo.ufnV_BU_cgd(\'" & e.DataRow("来源单号") & "\')"
    
    Dim pr As Row = Tables(winName & "_主表").Current
    pr("事业部名称") = cmd.ExecuteScalar()
End If