其实我学的也不好,但刚好自己有这么一个以前自己凑的类似的p,图片以文件夹命名,对子文件夹内的文件有效。- @echo off
- title 图片按创建时间以文件夹名命名
- copy %0 图片以文件夹名命名.bat
- del gaiming.bat>nul 2>nul
- echo 程序正在疯狂工作中
- >>gaiming.bat echo @echo off
- >>gaiming.bat echo setlocal enabledelayedexpansion
- >>gaiming.bat echo for /f "delims=" %%%%i in ('dir/b/on *.jpg') do (
- >>gaiming.bat echo set /a p+=1
- >>gaiming.bat echo set "str=%%%%~xi"
- >>gaiming.bat echo for /f "delims=" %%%%j in ("%%%%~dpi.") do (
- >>gaiming.bat echo set "str=!str:%%%%~j-=!"
- >>gaiming.bat echo if EXIST "%%%%~njA!p!!str!" (
- >>gaiming.bat echo ren "%%%%~njA!p!!str!" "%%%%~njA!p!.mcm"
- >>gaiming.bat echo ) else (
- >>gaiming.bat echo for /f "delims=" %%%%z in ('dir/b/on *.jpg') do (
- >>gaiming.bat echo ren "%%%%z" "%%%%~njA!p!.mcm")
- >>gaiming.bat echo )
- >>gaiming.bat echo )
- >>gaiming.bat echo )
- >>gaiming.bat echo ren *.mcm *.jpg
- for /d %%i in (*) do (
- copy /y gaiming.bat "%%i\">nul
- echo 正在处理 %%i
- ping /n 1 127.1 >nul
- cd "%~dp0\%%i"
- call gaiming.bat
- del gaiming.bat
- cd "%~dp0"
- set p+=0
- )
- del gaiming.bat
复制代码 大致和楼主意思,要是不能凑合,就等高人出现吧。 |