- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]请假的输入的问题。（已解决） (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84647)
-- 发布时间：2016/5/6 13:14:00
-- [求助]请假的输入的问题。（已解决）
我希望，表“员工情况”张三5月10日请假，那在派单表选择5月10日时，员工列里不显示张三？希望指导。谢谢
[此贴子已经被作者于2016/5/18 13:43:46编辑过]
-- 发布时间：2016/5/6 13:16:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.table |
-- 发布时间：2016/5/6 14:51:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目2.table |
-- 发布时间：2016/5/6 16:17:00
--
非常感谢！
再请教：例如 2016年5月09日 时段：一班 已选定张三。。。。在此5月09日一班再选择，没有张三。谢谢!
[此贴子已经被作者于2016/5/6 16:23:14编辑过]
-- 发布时间：2016/5/6 16:34:00
--
DataColChanged事件
Select Case e.DataCol.name
Case "日期","时段"
If e.DataRow.IsNull("员工") = False AndAlso e.DataRow.IsNull("日期") = False Then
Dim nstr As String = ""
Dim ls As List(Of String) = DataTables("员工情况").GetValues("请假人", "请假日期 = #" & e.DataRow("日期") & "#")
For Each yg As String In e.DataRow("员工").split(",")
If ls.Contains(yg) = False Then
nstr &= yg & ","
End If
Next
e.DataRow("员工") = nstr.trim(",")
End If
End Select
[此贴子已经被作者于2016/5/6 16:49:17编辑过]
-- 发布时间：2016/5/6 16:46:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目4.table |
还是没对。
[此贴子已经被作者于2016/5/6 16:45:57编辑过]
-- 发布时间：2016/5/6 16:50:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目4.table |
-- 发布时间：2016/5/6 16:52:00
--
狐表有您大红袍，更精彩！谢谢！但是好像还是不行呢？
[此贴子已经被作者于2016/5/6 17:09:23编辑过]
-- 发布时间：2016/5/6 17:10:00
--
还是不行呢？
-- 发布时间：2016/5/6 17:10:00
--
什么不行啊。