[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

【挑战】利用批处理命令findstr判断输入日期的合法性

要求:
  编写纯批处理对输入的日期进行合法性判断

  必须用且只能用一次findstr进行判断,模式为echo %str%|findstr

      请对代码进行简要的说明,至少讲清楚你的思路


  合法性:

    1、输入为8个纯数字,如:20100529(yyyymmdd)

    2、年份为1000-3000年,允许对平闰年进行计算判断

    3、月份合理性判断

    4、日期合理性判断,特别注意对2月日期的判断
附截图如下:
***共同提高***

回复 23# CrLf


发现好象没人提计划任务, 那我提一下
  1. schtasks /create /TN faketask /TR "CMD /C" /SC ONCE /SD 2015/12/18 /ST 00:00 /F
  2. 成功: 成功创建计划任务 "faketask"。
  3. ECHO %ERRORLEVEL%
  4. 0
  5. schtasks /create /TN faketask /TR "CMD /C" /SC ONCE /SD 2015/12/41 /ST 00:00 /F
  6. 错误: 开始日期不正确。
  7. ECHO %ERRORLEVEL%
  8. -2147467259
复制代码

TOP

回复 40# qzwqzw


    正好写过日期检查函数,也贴个单 set 方案。
函数体:
  1. :ChechDate Date(YYYYMMDD)
  2. ::检查日期是否合法,合法时将改变 errorlevel 变量的值为 0,非法时为 1,参数格式错误时不作改变
  3. setlocal disabledelayedexpansion
  4. set/a"1/((date=%~1)/10000)" 2>nul||echo call :ChechDate Date(YYYYMMDD)&&exit/b
  5. set/a"b=1,y=%date:~,-4%,m=1%date:~-4,2%-100,d=1%date:~-2%-100,test=!(y%%4|!(y%%100)*!!(y%%400))*!(m^2)+(m+m/8)%%2-2*!(m^2)+30,b=0/(test/d*!(m/13))" 2>nul&&echo Right||echo Wrong
  6. exit/b%b%
复制代码
使用范例:
  1. @echo off
  2. echo 20111215
  3. call CheckDate 20111215
  4. echo   %%errorlevel%%=%errorlevel%
  5. ::一个正确的日期
  6. echo;
  7. echo 20110229
  8. call CheckDate 20110229
  9. echo   %%errorlevel%%=%errorlevel%
  10. ::一个错误的日期
  11. echo;
  12. echo 20120229
  13. call CheckDate 20120229 >nul
  14. if errorlevel 1 (echo 错误) else echo 正确
  15. echo   可以用 if errorlevel 判断
  16. ::也可以用连接符进行正误判断并自定义操作
  17. echo;
  18. echo 20120100
  19. call CheckDate 20120100 >nul&&echo 正确||echo 错误
  20. echo   也可以用管道符判断正误
  21. ::也可以用连接符进行正误判断并自定义操作
  22. pause>nul
复制代码

TOP

本帖最后由 hfg1977 于 2012-2-3 02:27 编辑
  1. 说明:
  2. 1.第一位为闰平年标志位
  3. 2.set /a "yp=!(year%%4)^!(year%%100)|!(year%%400)"
  4. 该公式在batman版主的贴中学习到
  5. 3.枚举所有合法的日期:
  6. [0-1][1-2][0-9][0-9][0-9]-[0][1-9]-[0-1][1-9]
  7. [0-1][1-2][0-9][0-9][0-9]-[0][1 3-9]-[1-2][0-9]
  8. [0-1][1-2][0-9][0-9][0-9]-[0][13578]-[3][0-1]
  9. [0-1][1-2][0-9][0-9][0-9]-[0][469]-[3][0]
  10. [0-1][1-2][0-9][0-9][0-9]-[1][0-2]-[0][1-9]
  11. [0-1][1-2][0-9][0-9][0-9]-[1][0-2]-[1-2][0-9]
  12. [0-1][1-2][0-9][0-9][0-9]-[1][02]-[3][0-1]
  13. [0-1][1-2][0-9][0-9][0-9]-[1][1]-[3][0]
  14. [0][1-2][0-9][0-9][0-9]-[0][2]-[2][0-8]
  15. [1][1-2][0-9][0-9][0-9]-[0][2]-[2][0-9]
复制代码
“阿姐走了。。。可是。。。我。。。我愿意。”

TOP

本帖最后由 hfg1977 于 2012-2-3 02:27 编辑
  1. ::======================= 利用findstr判断输入日期的合法性 1000~2999===========
  2. @echo off
  3. set "str="&set /p "str=请输入yyyymmdd: "
  4. set "year=%str:~0,4%"
  5. set /a "yp=!(year%%4)^!(year%%100)|!(year%%400)"
  6. set "str=%yp%%str%"
  7. echo %str%>con&echo %str%|findstr "\<[0-1][1-2][0-9][0-9][0-9][0][1-9][0-1][1-9]\> \<[0-1][1-2][0-9][0-9][0-9][0][1 3-9][1-2][0-9]\> \<[0-1][1-2][0-9][0-9][0-9][0][13578][3][0-1]\> \<[0-1][1-2][0-9][0-9][0-9][0][469][3][0]\> \<[0-1][1-2][0-9][0-9][0-9][1][0-2][0][1-9]\> \<[0-1][1-2][0-9][0-9][0-9][1][0-2][1-2][0-9]\> \<[0-1][1-2][0-9][0-9][0-9][1][02][3][0-1]\> \<[0-1][1-2][0-9][0-9][0-9][1][1][3][0]\> \<[0][1-2][0-9][0-9][0-9][0][2][2][0-8]\> \<[1][1-2][0-9][0-9][0-9][0][2][2][0-9]\>">nul&&echo 这是合法的日期||echo 这不是合法的日期
  8. pause
  9. ::===================== end 判断日期合法性================================
复制代码
判断是否闰年 套用"batman "版主的公式.
“阿姐走了。。。可是。。。我。。。我愿意。”

TOP

呵呵,学习了,这个好用

TOP

贴一下单条set的方案
利用了很多Set/a的错误检测特性
_%输入值%=1%输入值%
::利用运算符不存在检测判断输入值是否全数字
1/(年/1000) 和 1/(3000/年)
::利用被0除错误检测输入值中的年份是否1000<=年<=3000
%输入值:~7%/(9/1%输入值:~8%)
::利用运算符不存在和被0除错误检测输入值长度是否等于8
诸如此类
  1. @echo off & setlocal
  2. :loop
  3. set /p 输入值=按yyyymmdd格式输入日期,输入Q退出:
  4. if /i "%输入值%"=="q" goto :eof
  5. rem 去除输入串前后的空格
  6. for %%v in (%输入值%) do set 输入值=%%v
  7. 2>nul set /a "_%输入值%=1%输入值%,%输入值:~7%/(9/1%输入值:~8%),年=1%输入值:~0,4%-10000,月=1%输入值:~4,2%-100,日=1%输入值:~6,2%-100,大月=!((月-1)*(月-3)*(月-5)*(月-7)*(月-8)*(月-10)*(月-12)),闰年=!(年%%4)&!(!(年%%100))|!(年%%400),1/((年/1000)*(3000/年)*(月/1)*(12/月)*(日/1)*(31/日)*(!(日/31)|大月)*(!(日/30)|(月-2))*(!(日/29)|(月-2)|闰年))"&&set 结果=合法||set 结果=非法
  8. echo set/a检测'%输入值%'的结果:%结果%的日期
  9. echo.
  10. goto :loop
  11. pause
复制代码
1

评分人数

天的白色影子

TOP

38# qzwqzw


单条set不难,单条算式倒是比较麻烦,不过貌似也有捷径

TOP

刚才思考了一下
使用单条set应该也可以实现日期的合法性检查
有兴趣的可以贴一下的自己的方案
要求与楼主的大致相同
只是除了变换一下命令主体
天的白色影子

TOP

修订了正模式中的非2月的20~29匹配模式
比如如下的值正模式判断出错
20010020

set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]0[^2]2[0-9]$"
改为
set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]0[^02]2[0-9]$"
天的白色影子

TOP

35# qzwqzw
多谢提醒,已合并。。。

对于逆向的多项匹配确实是不能用/x和/v,一时也无好的思路。。。
***共同提高***

TOP

是的特意没有判断3000年
感觉没有什么意义
如果扩展的话
可以直接简单扩展到0000~9999

32楼的正则模式串
可以将10以上月份的10~29合并匹配

感觉/x没有办法适应逆模式下的非法长度判定
不可有何扩展的思路
天的白色影子

TOP

33# qzwqzw
两种模式的判断,好!

但楼上是特意不判断3000年的吗?
***共同提高***

TOP

本帖最后由 qzwqzw 于 2011-5-30 20:08 编辑

以下是正、逆模式的测试代码
请各位检阅
  1. @echo off & setlocal
  2. set 正模式=
  3. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]0[1-9]0[1-9]$"
  4. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]0[1-9]1[0-9]$"
  5. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]0[^02]2[0-9]$"
  6. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]022[0-8]$"
  7. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]0[13578]3[0-1]$"
  8. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]0[469]30$"
  9. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]1[0-2]0[1-9]$"
  10. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]1[0-2][12][0-9]$"
  11. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]1[02]3[0-1]$"
  12. set "正模式=%正模式% ^[1-2][0-9][0-9][0-9]1130$"
  13. set "正模式=%正模式% ^[1-2][0-9][13579][26]0229$"
  14. set "正模式=%正模式% ^[1-2][0-9][2468][048]0229$"
  15. set "正模式=%正模式% ^[1-2][0-9][02468][48]0229$"
  16. set "正模式=%正模式% ^[02468][048]000229$"
  17. set "正模式=%正模式% ^[13579][26]000229$"
  18. set 正模式
  19. echo.
  20. set 逆模式=
  21. set "逆模式=%逆模式% ^$"
  22. set "逆模式=%逆模式% ^.$"
  23. set "逆模式=%逆模式% ^..$"
  24. set "逆模式=%逆模式% ^...$"
  25. set "逆模式=%逆模式% ^....$"
  26. set "逆模式=%逆模式% ^.....$"
  27. set "逆模式=%逆模式% ^......$"
  28. set "逆模式=%逆模式% ^.......$"
  29. set "逆模式=%逆模式% ^..........*$"
  30. set "逆模式=%逆模式% [^0-9]"
  31. set "逆模式=%逆模式% ^[3-9]"
  32. set "逆模式=%逆模式% 00..$"
  33. set "逆模式=%逆模式% 1[3-9]..$"
  34. set "逆模式=%逆模式% [2-9]...$"
  35. set "逆模式=%逆模式% 00$"
  36. set "逆模式=%逆模式% 3[2-9]$"
  37. set "逆模式=%逆模式% [4-9].$"
  38. set "逆模式=%逆模式% 0[469]31$"
  39. set "逆模式=%逆模式% 1131$"
  40. set "逆模式=%逆模式% 0230$"
  41. set "逆模式=%逆模式% [13579]0229$"
  42. set "逆模式=%逆模式% [13579][048]0229$"
  43. set "逆模式=%逆模式% [02468][26]0229$"
  44. set "逆模式=%逆模式% [13579]000229$"
  45. set "逆模式=%逆模式% [13579][048]000229$"
  46. set "逆模式=%逆模式% [02468][26]000229$
  47. set 逆模式
  48. echo.
  49. :loop
  50. set /p 输入值=按yyyymmdd格式输入日期,输入Q退出:
  51. if /i "%输入值%"=="q" goto :eof
  52. rem 去除输入串前后的空格
  53. for %%v in (%输入值%) do set 输入值=%%v
  54. echo.%输入值%|findstr "%正模式%">nul && set 正结果=合法|| set 正结果=非法
  55. echo 正模式匹配后:'%输入值%'是%正结果%的日期
  56. echo.
  57. echo.%输入值%|findstr "%逆模式%">nul && set 逆结果=非法|| set 逆结果=合法
  58. echo 逆模式匹配后:'%输入值%'是%逆结果%的日期
  59. echo.
  60. goto :loop
复制代码
1

评分人数

    • batman: 思路总是那么相似PB + 10
天的白色影子

TOP

本帖最后由 batman 于 2011-5-30 19:52 编辑

期待qzw完整代码的出现,先贴出本人的愚解:
  1. @echo off
  2. :lp
  3. cls&set "flag="&set "str="
  4. set /p str=请输入:
  5. set /a "p=!(%str:~,4%%%4)&!(!(%str:~,4%%%100))|!(%str:~,4%%%400)+8">nul 2>nul
  6. echo %str%|findstr /x "[1-2][0-9][0-9][0-9]0[1-9]0[1-9] [1-2][0-9][0-9][0-9]1[0-2]0[1-9] [1-2][0-9][0-9][0-9]0[1-9]1[0-9] [1-2][0-9][0-9][0-9]1[0-2][1-2][0-9] [1-2][0-9][0-9][0-9]0[13456789]2[0-9] [1-2][0-9][0-9][0-9]022[0-%p%] [1-2][0-9][0-9][0-9]0[13578]3[0-1] [1-2][0-9][0-9][0-9]0[469]30 [1-2][0-9][0-9][0-9]1[02]3[0-1] [1-2][0-9][0-9][0-9]1130 30000[1-9]0[1-9] 30001[0-2]0[1-9] 30000[1-9]1[0-9] 30001[0-2][1-2][0-9] 30000[13456789]2[0-9] 3000022[0-%p%] 30000[13578]3[0-1] 30000[469]30 30001[02]3[0-1] 30001130">nul||set "flag=不"
  7. echo 这是%flag%合法的日期
  8. pause>nul&goto lp
复制代码
简要说明下思路如下:
    整体为正向匹配法,就是列出所有合法日期的组合。正则表达式本来就很长了,如果再加入对平闰年的组合,表达式将更长,所以在前面对平闰年进行了计算并设置了针对二月的日期变量。

    随后在正则中先将合法年份的判断分为两个部分,第一部分的正则是[1-2][0-9][0-9][0-9],第二部分的正则就是3000;然后再这两种情况下分别组合日期为[0]1-9,[1-2][0-9],3[0-1]的情况,并在其中加入对月份合法的正则判断以及各月份最大天数值的正则判断,重点对2月进行了判断,正则为022[0-%p%],具体的分项为[1-2][0-9][0-9][0-9]022[0-%p%]和3000022[0-%p%]。其中p值为set/a计算出来的,平年为8,闰年为9。

    至于字符串合法性判断,以及长度判断用一个/x参数就可以实现了。

    个人测试没有发现问题,欢迎大家测试并批评指导。
***共同提高***

TOP

返回列表