嗯,谢谢大红袍老师。
我刚才写了如下的代码:
Dim jb As New SQLJoinTableBuilder("统计表","kcmx")
Dim Cols1() As String = {"hh","ph"}
Dim Cols2() As String = {"hh","ph"}
Dim Cols3() As String = {"hh","ph"}
jb.AddTable("kcmx",Cols1,"xsdmx",Cols1)
jb.AddTable("kcmx",Cols1,"rkdmx",Cols2)
jb.AddTable("kcmx",Cols1,"qtck",Cols3)
jb.AddTable("kcmx","hh","sp","hh")
jb.AddCols("{kcmx}.hh","{kcmx}.pm","{kcmx}.sccj","{kcmx}.gg","{kcmx}.dw","{kcmx}.ph","{kcmx}.yxqz","qckc","rq","dflsx","splb","yxqx","clccsx1","xsglsx2")
jb.AddExp("销售数量", "Sum(xssl)")
jb.AddExp("入库数量", "Sum(rksl)")
jb.AddExp("其他", "Sum(cksx)")
jb.AddExp("库存数量", "IsNull(qckc,0) + Sum(rksl) - Sum(xssl) - Sum(cksx)")
'jb.AddExp("库存数量", " IsNull("qckc",0) + IsNull(Sum("rksl"),0) - ISNULL(sum("xssl"),0) - ISNULL(sum("cksx"),0)" )
jb.Filter = "库存数量 > 0.01"
jb.build()
MainTable = Tables("统计表")
但是提示:
Microsoft Jet 数据库引擎找不到输入表或查询 '~TMPCLPkcmx'。 确定它是否存在,以及它的名称的拼写是否正确。
是什么原因呢?
上述代码中一条库存对应着好几条入库记录,也对应着好几条销售记录。