【Date】两个日期天数+指定向前向后几天的日期

kucha007 · 发表于 2024-4-6 19:55

本帖最后由 kucha007 于 2024-4-8 22:15 编辑

参考这两个帖子：
LISP计算时间差
How to find 'File Created Time'

函数：

;返回两个(Lst)日期之间的天数@Kucha
;(K:RtnDateDst (list Year Moth Date) (list Year Moth Date))
;返回指定日期Num后的日期@Kucha, Num为正则向前,Num为负则向后
;(K:RtnDate4Num (list Year Moth Date) Num)

复制代码

用法：

(K:RtnDateDst (K:Time2Lst "20240111") (K:Time2Lst "20240101"));计算两日期时间差
(K:RtnDate4Num (K:Time2Lst "20240111") 10);10天后的日期
(K:RtnDate4Num (K:Time2Lst "20240111") -10);10天前的日期

复制代码

kucha007 · 发表于 2024-4-6 22:31

本帖最后由 kucha007 于 2024-4-8 22:16 编辑

备用楼:
20240408-增加了计算指定日期向前向后指定天数的日期

nochao · 发表于 2024-4-7 21:24

本帖最后由 nochao 于 2024-4-7 21:27 编辑

在工作中可能会经常发生这样的情况：求指定的某个日期往前或推后N日/工作日得出结果是哪一天？比如这个项目3天后可以启动，时间只有18个工作日，那是哪一天之前必须完成？
又或者已经知道了是6月1号之前必须完成，哪是还有多少个工作日（需要知道时间来安排人手）？

magicheno · 发表于 2024-4-7 22:40

感谢大佬分享

kucha007 · 发表于 2024-4-8 13:05

nochao 发表于 2024-4-7 21:24
在工作中可能会经常发生这样的情况：求指定的某个日期往前或推后N日/工作日得出结果是哪一天？比如这个项目 ...

有道理，晚点试着写一下

kucha007 · 发表于 2024-4-8 22:16

nochao 发表于 2024-4-7 21:24
在工作中可能会经常发生这样的情况：求指定的某个日期往前或推后N日/工作日得出结果是哪一天？比如这个项目 ...

已更新，烦请测试一下

账号		自动登录	找回密码
密码			注册

【Date】两个日期天数+指定向前向后几天的日期

本帖子中包含更多资源

评分