以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]如何将两个表所有姓名加载进来汇总 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=112971) |
-- 作者:188802386 -- 发布时间:2018/1/5 21:43:00 -- [求助]如何将两个表所有姓名加载进来汇总 Dim dt As DataTable = DataTables("all业绩表") dt.DataRows.Clear Dim d1 As Date = Forms("佣金一览表").Controls("StartDate").Value Dim d2 As Date = Forms("佣金一览表").Controls("EndDate").Value Dim filter2 As String = "入职日期 <= #" & d2 & "# and (离职日期 >= #" & d1 & "# or 离职日期 is null)" For Each dr As DataRow In DataTables("users").Select(filter2) Dim ndr As DataRow = dt.AddNew ndr("姓名") = dr("姓名") ndr("部门") = dr("部门名称") ndr("职称") = dr("职称名称") ndr("业绩") = DataTables("员工业绩表").Compute("sum(已收佣金)","[姓名] = \'" & dr("姓名") & "\'") Next MainTable = Tables("all业绩表") Forms("全员业绩表").open 以上只能实现“users”表的 姓名 列内容添加进来,但是“员工业绩表” 却还有 “users”表里没有的人员,请问该如何把两个表显示的不重复的姓名 添加进来呢
|
-- 作者:有点蓝 -- 发布时间:2018/1/5 22:33:00 -- 创建查询表,合并2个表的员工:http://www.foxtable.com/webhelp/scr/2329.htm select 姓名,部门,职称 from users union select 姓名,部门,职称 from 员工业绩表
|