function TmainForm.WorksDay( //计算两个日期间有多少个工作日
mStartDate: TDate; //开始日期
mEndDate: TDate //终止日期
): Integer; //返回两个日期间的工作日,如果输入错误则返回-1
var m,n:integer;
begin
Result := -1;
if mEndDate < mStartDate then Exit;
m:=DaysBetween(mStartDate,mEndDate);
n:=(m div 7)*2;
if m mod 7<>0 then
begin
if DayOfWeek(mStartDate)>DayOfWeek(mEndDate) then n:=n+2;
if DayOfWeek(mStartDate)=1 then n:=n+1;
if DayOfWeek(mEndDate)=1 then n:=n-1;
end;
result:=m-n;
end;[@more@]

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/11218608/viewspace-1011005/,如需转载,请注明出处,否则将追究法律责任。

转载于:http://blog.itpub.net/11218608/viewspace-1011005/

计算两个日期间有多少个工作日相关推荐

  1. sqlserver两个日期之间的年数_SQL语句计算两个日期之间有多少个工作日的方法

    /* 因为工作中一个奇怪的需求,要用SQL语言计算两个日期间有多少个工作日. 设定是一个星期有5个工作日,从星期一到星期五 说明: 第一个星期的工作日数:DATEPART(dw, @begdt)-DA ...

  2. Python计算两个日期间的工作日(交易日),去除周末节假日

    首先区分一下这里的工作日和节假日是不同的. 工作日是指去掉节假日即周末,但是不去掉调休的日期. 交易日主要针对金融行业,是指去掉节假日和周末,因为周末金融市场也是停盘的,所以即使周末因为调休工作,也不 ...

  3. LocalDate计算两个日期间距离

    1.LocalDate提供了until()方法,计算了两个日期之间的年.月和日的周期 例如: from {@code 2017-08-28} to {@code 2018-09-30} is &quo ...

  4. period_diff()函数不能用于计算两个日期间的天数

    period_diff()函数返回两个日期之间的月份数,不能用于计算两个日期间的天数,比如 SELECT PERIOD_DIFF(20200325,20200404) FROM DUAL; 结果是9, ...

  5. 计算两个日期间相隔了多少周

    计算两个日期间相隔多少周,只要个了周日就算一周 /** * 计算两个日期间相隔的周数 * * @param startDate * 开始日期 * @param endDate * 结束日期 * @re ...

  6. oracle计算两个日期间的工作日(根据表配置)

    首先新增表用于配置非工作日,工作日,具体配置在程序中处理 DROP TABLE "T_WEEKDAY"; CREATE TABLE "T_WEEKDAY" (& ...

  7. DATEDIF计算两个日期间的天、月、年间隔数

    DATEDIF函数,主要用于计算两个日期之间的天数.月数或年数.其返回的值是两个日期之间的年\月\日间隔数. 基本语法:DATEDIF(Start_Date,End_Date,Unit) Start_ ...

  8. java计算两个日期间过了多少天

    再做一个小东西. 其中在数据库中有一个字段为datetime类型,想要计算两个日期之间过了多少天 多少小时 多少分钟. 思路为把时间换算为毫秒(与协调世界时 1970 年 1 月 1 日午夜之间的时间 ...

  9. JAVA 计算两个日期间的时间间隔

    public long getTime() Returns the number of milliseconds since January 1, 1970, 00:00:00 GMT represe ...

最新文章

  1. “阿里巴巴大数据系统体系”学习笔记-纲领篇
  2. 讨论工字型接收线圈天线不同匝数对于低频定位信号检测影响:150kHz导航信号
  3. 颈椎前路caspar撑开器_82岁女性神经根型颈椎病,你该怎么办?手术还是不手术?...
  4. Windows 7镜像坎坷之路 - 都是Daemon Tools惹得祸
  5. JAVA基础知识|进程与线程
  6. 修改java阻塞数,加快他的运行速度
  7. Python项目导出依赖包requirements.txt
  8. StringUtil.isNotEmpty
  9. SQL Server 数据库安装教程SQL Server 2017
  10. 图像处理中的白化处理
  11. 微笑哥,工作快乐感与快乐企业文化
  12. 《胡雪岩全传》高阳——读后感
  13. [非线性控制理论]5_自适应控制器(Adaptive controller)
  14. 让Win7系统下的硬盘不在狂闪的诀窍【mfxp】
  15. 小程序加载不出来图片
  16. 服务器网卡bond配置指引
  17. Mac安装与配置jmeterjmeter的使用jmeter生成性能测试报告
  18. 高度近视也不用带眼镜了 (经典珍藏版)
  19. 基于SC-LIO-SAM的SLAM实践
  20. “追随者”京东方,为何难有高估值?

热门文章

  1. [ 物联网篇 ] 41 - 嵌入式系统中的epoll_wait 的异常处理
  2. 简而繁的BlocksKit
  3. 实时流协议(RTSP) 来自 维基百科
  4. 【企业邮箱注册申请】网易企业邮箱教你如何防止开发信被反垃圾系统拦截
  5. 鲸鱼优化算法(WOA)及其优秀变体(含MATLAB代码)
  6. srs ~ Simple Realtime Server ~ 流媒体解决方案。
  7. FTP可以建立连接不能传输文件(FTP主被动模式)
  8. prometheus的TCP alloc取值
  9. 在校期间的 Java 学习路线
  10. mipmap以及滤波相关的理解