以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]字符型统计  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=42569)

--  作者:石四
--  发布时间:2013/11/15 15:20:00
--  [求助]字符型统计

帮助文件例子

e.DataRow("已收款金额") = DataTables("订单").Compute("Sum(金额)", Filter & " And 已付款 = True")

如果"已付款"列为字符型,上面那段代码怎么改?字符为"是"或"否"

我将 已付款 = True 改为 已付款 = 是

报错.

给是字加上单双引号也不行.

 


--  作者:Bin
--  发布时间:2013/11/15 15:26:00
--  
e.DataRow("已收款金额") = DataTables("订单").Compute("Sum(金额)", Filter & " And 已付款 = \'是\'")
--  作者:石四
--  发布时间:2013/11/15 15:41:00
--  

哦,我的例子和帮助文件的有一点点不一样,我的是这样的:

If e.DataCol.Name = "零件图号" Then
    e.DataRow("投料") = DataTables("记录").Compute("Sum(实际数量)","[零件图号] = \'" & e.NewValue & "\'")
    e.DataRow("装箱入库") = DataTables("成品入库").Compute("Sum(入库数量)","[零件图号] = \'" & e.NewValue & "\'")
    e.DataRow("销售出库") = DataTables("成品出库").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\'")
    e.DataRow("外协出库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & " And 出入库 = \'是\'") 

    e.DataRow("外协入库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & " And 出入库 = \'否\'") 
    End If

 

前面三个e正确,粉色字体的还有问题,麻烦版主再帮忙.


--  作者:Bin
--  发布时间:2013/11/15 15:43:00
--  

e.DataRow("外协出库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\'" And 出入库 = \'是\'") 

    e.DataRow("外协入库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\'" And 出入库 = \'否\'") 


--  作者:石四
--  发布时间:2013/11/15 16:06:00
--  

报错:name "出入库" is not declared

是什么意思?

 

没有声明变量?

[此贴子已经被作者于2013-11-15 16:07:29编辑过]

--  作者:Bin
--  发布时间:2013/11/15 16:09:00
--  
大概意思是说不是以公开的,按道理不会这样.你做个例子上来看看.
--  作者:狐狸爸爸
--  发布时间:2013/11/15 16:15:00
--  

呵呵,4楼的代码,多了一个双引号,改一下:

 

e.DataRow("外协出库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\' And 出入库 = \'是\'")
e.DataRow("外协入库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\' And 出入库 = \'否\'")


--  作者:石四
--  发布时间:2013/11/15 16:32:00
--  
好啦,谢谢!