Vbs获取两个日期天数间隔-阿里云开发者社区

Vbs获取两个日期天数间隔

2017-11-27 1229

版权

本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。

简介：

+关注继续查看

最近想通过用户密码过期邮件提醒脚本想换一种执行方法，原来方法是vbs连接到AD后台获取用户的相关字段属性，然后判断，然后现在系统升级了，用户的相关信息被保存到了SQL数据库中，所以想通过vbs连接数据库进行判断及发送提示，对于这个功能我们下一篇文章将会介绍，本次介绍的是vbs如何判断两个日期间隔；

vbs脚本中已经定义了datediff 函数进行两个日期或者时间的间隔进行判断，所以随便总结了一下分享给有需要的童鞋；对于热爱学些的童鞋来说，w3shool网站是一个好的帮助学习站点，可以供参考，里面有很多种类的学习帮助实例

http://www.w3school.com.cn/vbscript/vbscript_ref_functions.asp

我们只是一个实例，

Function pwdchdate() 

pwdchdate = "2016-11-01"
End Function

'MsgBox "用户最后一次密码修改日期:" & pwdchdate()
Function getnowdate()

getnowdate = year(Now)&"-"&Month(Now)&"-"&day(Now)
End Function 

'MsgBox "当前系统的日期:" & getnowdate() &Chr(10) & "用户最后一次密码修改日期:" & pwdchdate()

Function statistics    statistics = DateDiff("d",pwdchdate(),getnowdate())
End Function 

MsgBox "当前系统的日期:" & getnowdate() &chr(13) & "用户最后一次密码修改日期:" & pwdchdate()&chr(13) &"两个日期间隔天数:" & statistics()

本文转自高文龙 51CTO博客，原文链接：http://blog.51cto.com/gaowenlong/1874620，如需转载请自行联系原作者