以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  编码出错问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=86603)

--  作者:feixianzhi
--  发布时间:2016/6/21 15:33:00
--  编码出错问题

 

Select Case e.DataCol.name

    Case "供应商编码","客户编码", "商品名称","商品规格","单位", "进价","生产企业"

        Dim dr As DataRow = e.DataRow

    If e.DataRow("销售类型") = "按销售/生产企业/托管医院" Then       \'以药品名称\\生产企业\\托管医院\\进价,为条件

        dr("销售数量") = DataTables("批发表").Compute("sum(数量)",CExp(" 商品名称=\'{0}\' and 生产企业=\'{1}\' and 进价=\'{2}\' and 客户编码=\'1290\' or 客户编码=\'2848\' or 客户编码=\'2765\' or 客户编码=\'1238\'",dr("商品名称"),dr("生产企业"),dr("进价")))


     End If

End Select



我有两个表,一个是统计表,一个是批发表。统计表和批发表里都有商品名称、生产企业、进价列,批发表还有客户编码列。我想在统计表中按商品名称、生产企业、进价统计客户编码为1290、2848、2765、1238这四个客户的销售数量。

结果我用上面的编码,统计了很大的一个数,根本不对。

请哪位大师帮忙。谢谢。


--  作者:大红袍
--  发布时间:2016/6/21 15:34:00
--  
dr("销售数量") = DataTables("批发表").Compute("sum(数量)",CExp(" 商品名称=\'{0}\' and 生产企业=\'{1}\' and 进价=\'{2}\' and (客户编码=\'1290\' or 客户编码=\'2848\' or 客户编码=\'2765\' or 客户编码=\'1238\')",dr("商品名称"),dr("生产企业"),dr("进价")))
--  作者:feixianzhi
--  发布时间:2016/6/21 15:35:00
--  
谢谢大师。
--  作者:feixianzhi
--  发布时间:2016/6/21 15:40:00
--  
麻烦再问一下,如果想统计排除以上四个编码的客户数量是不是这样写
dr("销售数量") = DataTables("批发表").Compute("sum(数量)",CExp(" 商品名称=\'{0}\' and 生产企业=\'{1}\' and 进价=\'{2}\' and (客户编码<>\'1290\' or 客户编码<>\'2848\' or 客户编码<>\'2765\' or 客户编码<>1238\')",dr("商品名称"),dr("生产企业"),dr("进价")))


--  作者:大红袍
--  发布时间:2016/6/21 15:41:00
--  
dr("销售数量") = DataTables("批发表").Compute("sum(数量)",CExp(" 商品名称=\'{0}\' and 生产企业=\'{1}\' and 进价=\'{2}\' and 客户编码 not in (\'1290\', \'2848\', \'2765\', \'1238\')",dr("商品名称"),dr("生产企业"),dr("进价")))
--  作者:feixianzhi
--  发布时间:2016/6/21 15:45:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160621154319.png
图片点击可在新窗口打开查看

出现这个问题是怎么回事。

--  作者:大红袍
--  发布时间:2016/6/21 15:46:00
--  
5楼代码,没问题
--  作者:feixianzhi
--  发布时间:2016/6/21 15:48:00
--  
dr("销售数量") = DataTables("批发表").Compute("sum(数量)",CExp(" 商品名称=\'{0}\' and 生产企业=\'{1}\' and 进价=\'{2}\' and (客户编码=\'1290\' or 客户编码=\'2848\' or 客户编码=\'2765\' or 客户编码=\'1238\')",dr("商品名称"),dr("生产企业"),dr("进价")))


我是用这个代码的时候,出现的那个提示。

--  作者:大红袍
--  发布时间:2016/6/21 15:49:00
--  
8楼代码也没有问题
--  作者:feixianzhi
--  发布时间:2016/6/21 15:58:00
--  
谢谢大师。