以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这样算不了吗  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175016)

--  作者:qazlinle6
--  发布时间:2022/2/16 11:24:00
--  这样算不了吗
Dim dr1 As String = DataTables("业绩明细个人201609").Compute("Sum(提成业绩主销)",  "  [年] = \'" & e.DataRow("年") & "\' And  [月] = \'" & e.DataRow("月") & "\'   And  \'," & e.DataRow("个人提成店名") & ",\' like \'%,\' +店名+\',%\' And  [身份证姓名] = \'" & e.DataRow("姓名") & "\' ")

Dim dr2 As String = DataTables("业绩明细个人201609副销").Compute("Sum(提成业绩副销)",  "  [年] = \'" & e.DataRow("年") & "\' And  [月] = \'" & e.DataRow("月") & "\'   And  \'," & e.DataRow("个人提成店名") & ",\' like \'%,\' +店名+\',%\' And  [身份证姓名2] = \'" & e.DataRow("姓名") & "\' ")

e.DataRow("个人业绩")=dr1+dr2


这样算不了吗

--  作者:有点蓝
--  发布时间:2022/2/16 11:39:00
--  
Dim dr1 As double
--  作者:qazlinle6
--  发布时间:2022/2/16 11:55:00
--  
算不了,没反应
--  作者:有点蓝
--  发布时间:2022/2/16 12:01:00
--  
msgbox("  [年] = \'" & e.DataRow("年") & "\' And  [月] = \'" & e.DataRow("月") & "\'   And  \'," & e.DataRow("个人提成店名") & ",\' like \'%,\' +店名+\',%\' And  [身份证姓名] = \'" & e.DataRow("姓名") & "\' ")看看条件是否正确,如果正确说明没有符合条件的数据
--  作者:qazlinle6
--  发布时间:2022/2/16 12:11:00
--  
e.DataRow("个人业绩") = DataTables("业绩明细个人201609").Compute("Sum(提成业绩)",  "  [年] = \'" & e.DataRow("年") & "\' And  [月] = \'" & e.DataRow("月") & "\'   And  \'," & e.DataRow("个人提成店名") & ",\' like \'%,\' +店名+\',%\' And  [身份证姓名] = \'" & e.DataRow("姓名") & "\' ")



这样就可以

--  作者:有点蓝
--  发布时间:2022/2/16 13:34:00
--  
Dim dr1 As double

Dim dr2 As double

--  作者:qazlinle6
--  发布时间:2022/2/16 15:27:00
--  
不行,我还是在加两列单独取数算了