[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
直接输出还是不要用call,call太影响效率了。。。
***共同提高***

TOP

本帖最后由 batman 于 2011-6-6 13:21 编辑

9# zm900612
写个setlocal enabledelayedexpansion就这么难?非要用cmd /vn,效率我想前者还是要快一点点点吧。。。

20000229非法,哈哈。。。
***共同提高***

TOP

本帖最后由 batman 于 2011-6-6 16:08 编辑

老实人做老实事:
  1. @echo off&setlocal enabledelayedexpansion
  2. echo,&set /p start=请输入开始日期(形如2000-03-21):
  3. echo,&set /p end=请输入结束日期(形如2000-03-21):
  4. cls&echo,&echo,&echo,&echo,&echo         程序正在运行中,请稍候。。。
  5. 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
  6. for %%a in (1 3 5 7 8 10 12 4 6 9 11) do (
  7.   if %%a equ 4 set /a a-=1
  8.   set /a _%%a=a
  9. )
  10. (for /l %%a in (%sy%,1,%ey%) do (
  11.   set /a "_2=^!(%%a%%4)&^!(^!(%%a%%100))|^!(%%a%%400)+28"
  12.   set /a a=1,b=12
  13.   if "%%a" equ "%sy%" set /a a=sm
  14.   if "%%a" equ "%ey%" set /a b=em
  15.   for /l %%b in (!a!,1,!b!) do (
  16.     set /a c=1,d=_%%b
  17.     if "%%a%%b" equ "%sy%%sm%" set /a c=sd
  18.     if "%%a%%b" equ "%ey%%em%" set /a d=ed
  19.     for /l %%c in (!c!,1,!d!) do (
  20.       for %%d in (%%b %%c) do set ".%%d=0%%d"&set ".%%d=!.%%d:~-2!"
  21.       echo %%a-!.%%b!-!.%%c!
  22.     )
  23.   )
  24. ))>list.txt
  25. start list.txt      
复制代码
***共同提高***

TOP

16# 随风
确实是的
***共同提高***

TOP

返回列表