sqlText = "select b.Sys_ID as SaleID, b.OrderNo, a.sys_FactID,a.VendorName,sum(1) As ProductsCount fro m DDGL_XSCP a " & _
"left join DDGL_XSHT b on a.sys_billid =b.Sys_ID " & _
"wher e isnull(sys_FactID,0) >0 And sys_billid in (" & billIDs & ") group by b.Sys_ID,b.OrderNo,a.sys_FactID,a.VendorName "
Tables("自动采购_销售产品供应商表").Fill(sqlText ,"EhErp", True)
数据库执行脚本没问题
[此贴子已经被作者于2020/12/2 10:56:34编辑过]