- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助，考勤规则1月份核定，6月份修改，如何考勤时输入3月份的时间，自动调用6月份未变更前的考勤规则。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169736)
-- 发布时间：2021/6/28 14:54:00
-- 求助，考勤规则1月份核定，6月份修改，如何考勤时输入3月份的时间，自动调用6月份未变更前的考勤规则。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.zip |
如何实现，再考勤表中日期未3月份日期，自动调用1月份后，6月份前的考勤规则？
我用的事这个代码，录入时数据不准
Select Case e.DataCol.Name
Case "年份","月份","姓名"
Dim dr As DataRow = e.DataRow
Dim pr As DataRow
If dr.IsNull("年份") OrElse dr.IsNull("月份") OrElse dr.IsNull("姓名") Then
dr("考勤规则") = Nothing
Else
Dim filter As String
filter = "姓名 = \'" & dr("姓名") & "\' and 年份 > = \'" & dr("年份") & "\' And 月份 > = \'" & dr("月份") & "\'"
pr = DataTables("工资核定").Find(filter)
If pr IsNot Nothing Then
dr("考勤规则") = pr("考勤规则")
End If
End If
End Select
-- 发布时间：2021/6/28 15:16:00
--
不是很理解您的意思。这个？
filter = "姓名 = \'" & dr("姓名") & "\' and 年份 = \'" & dr("年份") & "\' And 月份 >= 1 and 月份 <= 6"
-- 发布时间：2021/6/28 15:42:00
--
变更可能不只是1月份和6月份，可能还会变更，我想要输入的日期再两次变更之间的数据，例如1月份 6月份，9月份都有变更，输入8月份，考勤规则显示6月份的规则，输入10月份就显示9月份的考勤规则
-- 发布时间：2021/6/28 15:56:00
--
filter = "姓名 = \'" & dr("姓名") & "\' and 年份 = \'" & dr("年份") & "\' And 月份 <= \'" & dr("月份") & "\'"
pr = DataTables("工资核定").Find(filter，“月份 desc”)
-- 发布时间：2021/6/28 16:07:00
--
搞定，谢谢