@echo off 
rem 比較運算符:  EQU - 等于  NEQ - 不等于   LSS - 小于   LEQ - 小于或等于   GTR - 大于   GEQ - 大于或等于 
rem 取模運算符:  %% DOS的取模運算符(批處理文件里用%%,非批處理命令行下用%) 

rem 日志文件夾名稱初始值 
set filelog=%date:~0,10%至 
rem 后續日期的變量 
set /A y=0 
set /A m=0 
set /A d=0 
rem 取日期YYYYMMDD中的DD兩位 
set /A dd= %date:~8,2% 
set /A ddp4= %dd% + 4 
rem 取日期YYYYMMDD中的MM兩位 
set /A mm= %date:~5,2% 
set /A mmp1= %mm% + 1  
rem 取日期YYYYMMDD中的YYYY四位 
set /A yyyy= %date:~0,4% 
set /A yyyyp1= %yyyy% + 1  
set /A yymd=yyyy %% 4 

rem 如果是31天的月份( 1,3,5,7,8,10,12 ) 
rem 12 月特殊 
if %mm% equ 12 ( 
 if %ddp4% leq 31 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
 ) 
 if %ddp4% gtr 31 ( 
  if %mmp1% gtr 12 ( 
   set /A y=%yyyy% + 1  
   set /A m= 1  
   set /A d=%ddp4% - 31  
  ) 
 ) 
 goto END 
) 
if %mm% equ 10 ( 
 if %ddp4% leq 31 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 31 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 31  
  ) 
  goto END 
) 
if %mm% equ 8 ( 
 if %ddp4% leq 31 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 31 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 31  
  ) 
  goto END 
) 
if %mm% equ 7 ( 
 if %ddp4% leq 31 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 31 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 31  
  ) 
  goto END 
) 
if %mm% equ 5 ( 
 if %ddp4% leq 31 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 31 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 31  
  ) 
  goto END 
) 
if %mm% equ 3 ( 
 if %ddp4% leq 31 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 31 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 31  
  ) 
  goto END 
) 
if %mm% equ 1 ( 
 if %ddp4% leq 31 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 31 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 31  
  ) 
  goto END 
) 

rem 如果是30天的月份( 4,6,9,11 ) 
if %mm% equ 11 ( 
 if %ddp4% leq 30 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 30 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 30  
  ) 
 goto END 
) 
if %mm% equ 9 ( 
 if %ddp4% leq 30 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 30 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 30  
  ) 
 goto END 
) 
if %mm% equ 6 ( 
 if %ddp4% leq 30 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 30 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 30  
  ) 
 goto END 
) 
if %mm% equ 4 ( 
 if %ddp4% leq 30 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 30 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 30  
  ) 
 goto END 
) 

rem 如果是28或29天的月份( 2 ) 
if %mm% equ 2 ( 
 if %yymd% equ 0 ( 
  if %ddp4% leq 29 ( 
   set /A y=%yyyy%  
   set /A m=%mm%  
   set /A d=%ddp4%  
  ) 
  if %ddp4% gtr 29 ( 
   set /A y=%yyyy%  
   set /A m=%mmp1%  
   set /A d=%ddp4% - 29  
  ) 
  goto END 
 ) 
 if %ddp4% leq 28 ( 
  set /A y=%yyyy%  
  set /A m=%mm%  
  set /A d=%ddp4%  
 ) 
 if %ddp4% gtr 28 ( 
  set /A y=%yyyy%  
  set /A m=%mmp1%  
  set /A d=%ddp4% - 28  
 ) 

) 

rem 組合文件夾名稱,并建立文件夾 
:END 
if %m% lss 10 set filelog=%filelog%%y%-0%m% 
if not %m% lss 10 set filelog=%filelog%%y%-%m% 
if %d% lss 10 set filelog=%filelog%-0%d% 
if not %d% lss 10 set filelog=%filelog%-%d% 
mkdir %filelog%