Vbs获取两个日期天数间隔
最近想通过用户密码过期邮件提醒脚本想换一种执行方法，原来方法是vbs连接到AD后台获取用户的相关字段属性，然后判断，然后现在系统升级了，用户的相关信息被保存到了SQL数据库中，所以想通过vbs连接数据库进行判断及发送提示，对于这个功能我们下一篇文章将会介绍，本次介绍的是vbs如何判断两个日期间隔；
vbs脚本中已经定义了datediff 函数进行两个日期或者时间的间隔进行判断，所以随便总结了一下分享给有需要的童鞋；对于热爱学些的童鞋来说，w3shool网站是一个好的帮助学习站点，可以供参考，里面有很多种类的学习帮助实例
http://www.w3school.com.cn/vbscript/vbscript_ref_functions.asp
我们只是一个实例，
|
1
2
3
4
5
6
7
8
9
10
11
|
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，如需转载请自行联系原作者