以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计物品数量  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=37468)

--  作者:mjx2018
--  发布时间:2013/7/4 12:15:00
--  统计物品数量

请问如何在人员表中统计出扳手和改锥的数量,需要三个表都关联还是需要代码。

图片点击可在新窗口打开查看

图片点击可在新窗口打开查看

图片点击可在新窗口打开查看


--  作者:Bin
--  发布时间:2013/7/4 12:23:00
--  
图片挂了.


图片点击可在新窗口打开查看此主题相关图片如下:上传图片请参考这里.gif
图片点击可在新窗口打开查看


--  作者:mjx2018
--  发布时间:2013/7/4 12:48:00
--  

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

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

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

--  作者:mjx2018
--  发布时间:2013/7/4 13:38:00
--  

请问如何在人员表中统计出扳手和改锥的数量?


--  作者:don
--  发布时间:2013/7/4 13:49:00
--  
文件!
--  作者:y2287958
--  发布时间:2013/7/4 13:49:00
--  

用关联表吧


--  作者:mjx2018
--  发布时间:2013/7/4 14:01:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


--  作者:lsy
--  发布时间:2013/7/4 14:10:00
--  
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "Select b.姓名, a.客户, a.工具 , Sum(a.数量) as 数量 From {发货} a,{客户} b,{人员} c Where a.客户 = b.客户 And b.姓名 = c.姓名 Group By b.姓名, a.客户, a.工具"
dt = cmd.ExecuteReader()
For Each r As Row In Tables("人员").Rows
    For Each dr As DataRow In dt.DataRows
        If r("姓名") = dr("姓名") AndAlso dr("工具") = "扳手" Then
            r("扳手") = dr("数量")
        ElseIf r("姓名") = dr("姓名") AndAlso dr("工具") = "改锥" Then
            r("改锥") = dr("数量")
        End If
    Next
Next

--  作者:mjx2018
--  发布时间:2013/7/4 14:35:00
--  
您好,因是初学者,您能帮忙编辑到文件中发回吗?
--  作者:lsy
--  发布时间:2013/7/4 14:38:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多表数量统计.table