Foxtable(狐表)用户栏目专家坐堂 → 日期返回第几周


  共有8937人关注过本帖树形打印复制链接

主题:日期返回第几周

帅哥哟,离线,有人找我吗?
wqc360
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:790 积分:5695 威望:0 精华:0 注册:2009/4/17 18:42:00
日期返回第几周  发帖心情 Post By:2010/3/22 18:47:00 [只看该作者]

请问有没有日期返回第几周的代码,还有法定假日
因公司要结合劳动法计算工资,需要根据考勤计算每星期出勤天数或者工时(以星期为单位,好自动计算加班时间和工作天数)。

 回到顶部
帅哥哟,离线,有人找我吗?
wyz20130512
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1249 积分:9480 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2017/7/2 11:05:00 [只看该作者]

DatePart("ww",date)

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/2 13:59:00 [只看该作者]

1、法定节假日,你需要另外做一张表。

 

2、第几周,你要这样处理

 

Dim d As Date = "2017-1-9"

Dim gc As System.Globalization.GregorianCalendar = new System.Globalization.GregorianCalendar()
Dim weekOfYear As Integer = gc.GetWeekOfYear(d,System.Globalization.CalendarWeekRule.FirstDay, DayOfWeek.Monday)
Return weekOfYear


 回到顶部