- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]人员数量统计及如何根据条件判断是否名字重复？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=26872)
-- 发布时间：2012/12/16 14:21:00
-- [求助]人员数量统计及如何根据条件判断是否名字重复？
我在“加班通知单”表中，添加了另一个误餐审批单模板，这模板需要统计加班人员的人数，我只会写e.Book.Marks("人数") = Tables("加班通知单.加班人员表").Rows.Count
当要打印一张单的时候，前行的人数能统计出来，但打印多张单的时候，后面的加班人员的数量就统计不了啦。。。
还有个问题，在“加班通知单.加班人员表”表中，怎么根据“时间_日期”和“时间_开始时间”来判断输入的加班人员姓名是否重复，如果重复就提示”该人员已存在“，
例如：
20121101001 2012年11月1日，12：30-14：30 加班人员： 夏星、王小利、符东
20121101002 2012年11月1日，12：30-14：30 加班人员：刘星、周智、符东（此时输入符东的时候就提示”该人员已存在“）
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:加班管理16.rar |
-- 发布时间：2012/12/16 22:33:00
--
求老师关注。。。。
-- 发布时间：2012/12/17 0:56:00
--
人员数量统计解决方法
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=18173&skin=0
-- 发布时间：2012/12/17 8:05:00
--
人员统计问题已解决，在父表增加一个表达式用来统计子表的记录数，这样在打印模板就能做出来了
但在“加班通知单.加班人员表”表中，怎么根据“时间_日期”和“时间_开始时间”来判断输入的加班人员姓名是否重复，如果重复就提示”该人员已存在“，
例如：
20121101001 2012年11月1日，12：30-14：30 加班人员： 夏星、王小利、符东
20121101002 2012年11月1日，12：30-14：30 加班人员：刘星、周智、符东（此时输入符东的时候就提示”该人员已存在“）
还请高手指教
-- 发布时间：2012/12/17 9:07:00
--
编写datacolchanging事件。
Select Case e.DataCol.Name
Case "加班人员"
Dim dr As DataRow = e.DataRow.GetParentRow("加班通知单")
Dim num As String = Left(dr("加班编号"), 8)
Dim fdr As DataRow = e.DataTable.Find("加班编号 like \'" & num & "*\' And 加班人员 = \'" & e.NewValue & "\'")
If fdr IsNot Nothing Then
If fdr.GetParentRow("加班通知单")("时间_开始时间") = dr("时间_开始时间") Then
msgbox("重复")
e.NewValue = Nothing
End If
End If
End Select