[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 1# yp2121540
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. REM 设置开始日期
  4. set start=2019-01-01
  5. REM 设置结束日期
  6. set end=2019-01-15
  7. set /a sy=%start:~,4%,sm=1%start:~5,2%%%100,sd=1%start:~8,2%%%100,ey=%end:~,4%,em=1%end:~5,2%%%100,ed=1%end:~8,2%%%100,a=31
  8. for %%a in (1 3 5 7 8 10 12 4 6 9 11) do (
  9.     if %%a equ 4 set /a a-=1
  10.     set /a _%%a=a
  11. )
  12. (for /l %%a in (%sy%,1,%ey%) do (
  13.     set /a "_2=^!(%%a%%4)&^!(^!(%%a%%100))|^!(%%a%%400)+28"
  14.     set /a a=1,b=12
  15.     if "%%a" equ "%sy%" set /a a=sm
  16.     if "%%a" equ "%ey%" set /a b=em
  17.     for /l %%b in (!a!,1,!b!) do (
  18.         set /a c=1,d=_%%b
  19.         if "%%a%%b" equ "%sy%%sm%" set /a c=sd
  20.         if "%%a%%b" equ "%ey%%em%" set /a d=ed
  21.         for /l %%c in (!c!,1,!d!) do (
  22.             for %%d in (%%b %%c) do set ".%%d=0%%d"&set ".%%d=!.%%d:~-2!"
  23.             echo %%a-!.%%b!-!.%%c!
  24.         )
  25.     )
  26. ))>"%temp%\DateList.txt"
  27. type nul >"结果.txt"
  28. for /f %%a in ('type "%temp%\DateList.txt"') do (
  29.     if exist "%%a*.txt" (
  30.         type "%%a*.txt" >>"结果.txt"
  31.     )
  32. )
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 4# yp2121540


    3楼代码无法处理这个情况是吗?请把你的测试用例和测试结果发出来看看,我试试能否重现你的问题。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表