看似一个简单的问题,居然也要这么长的代码。。。
: | @echo off&setlocal enabledelayedexpansion | | set /p var=请输入: | | set .y=a&set .m=a&set .d=a&set h=ymd | | for /l %%a in (0 1 9) do set .%%a=a | | for %%i in (%date%) do ( | | set str=%%i&set "str=!str:~0,1!" | | if defined .!str! ( | | for /f "tokens=1-3 delims=/\,.-: " %%a in ("%%i") do ( | | set str=%%a&set str=!str:~2,1! | | if not defined .!str! set h=mdy | | set !h:~0,1!=%%a&set !h:~1,1!=%%b&set "!h:~2,1!=%%c" | | ))) | | :loop | | set n=%var:~0,1% | | if defined .%n% ( | | set num=!num!!%n%:~0,1! | | set "%n%=!%n%:~1!" | | ) else set "num=%num%%n%" | | set "var=%var:~1%" | | if defined var goto loop | | echo\&echo %num% | | pause>nulCOPY |
[ 本帖最后由 随风 于 2008-10-21 21:43 编辑 ] |