以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 记录下载后合并  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138016)

--  作者:susanhe
--  发布时间:2019/7/20 18:09:00
--  [求助] 记录下载后合并

版主

 

我从SQL上用以下代码下载数据后,产品相同的有重复的,可以不可以下载后把所有相同产品代码的数量相加。只要一条记录一个产品。

 

 

谢谢。

 

 


--  作者:susanhe
--  发布时间:2019/7/20 18:09:00
--  

Dim cmd As New SQLCommand
Dim dt As DataTable
DataTables("QC").datarows.clear
cmd.C
Dim Cols1() As String = {"FFullNumber","FName","FQty","FQcheckQty"}
Dim Cols2() As String = {"FFullNumber","FName","FQty","FQcheckQty"}


 


--  作者:susanhe
--  发布时间:2019/7/20 18:10:00
--  


dt = cmd.ExecuteReader()
For Each dr1 As DataRow In dt.DataRows
    Dim dr2 As DataRow = DataTables("BOm").AddNew()
    For i As Integer = 0 To Cols1.Length -1
        dr2(Cols2(i)) = dr1(Cols1(i))
         Next
Next

Tables("QC").ResumeRedraw()


Tables("QC").Sort = "FBOMNumber"
DataTables.save


--  作者:susanhe
--  发布时间:2019/7/20 18:13:00
--  

中间这段代码传不上来,不知道为什么,只能用截图


图片点击可在新窗口打开查看此主题相关图片如下:捕获1.jpg
图片点击可在新窗口打开查看

--  作者:susanhe
--  发布时间:2019/7/20 18:13:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看

--  作者:susanhe
--  发布时间:2019/7/20 18:14:00
--  
相同的FFullNumber 进行合并
--  作者:有点蓝
--  发布时间:2019/7/21 19:54:00
--  
作个分组统计即可:
把sql上传上来:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=69632

然后说一下"FFullNumber","FName","FQty","FQcheckQty"这些列都是属于什么表的