[文本处理] 批处理怎样可以批量用文件夹名命名文件？

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /ad /s /b') do (
   for /f "delims=" %%b in ('dir /a-d /s /b "%%a"') do (
      set /a a+=1
      if !a! lss 10 (
          ren "%%b" %%~na_0!a!%%~xb
) else (
          ren "%%b" %%~na_!a!%%~xb
)
)
)
复制代码

@echo off & setlocal ENABLEDELAYEDEXPANSION
for /f "usebackq" %%a in (`dir /b /ad`) do (
cd %%a
set a=0
	for %%i in (*.*) do (
		if !a! EQU 0 (
			ren %%i %%a%%~xi
		)
			if !a! LSS 10 (
				
				ren %%i %%a_0!a!%%~xi
				set /a a+=1
			) else (
				
				ren %%i %%a_!a!%%~xi
				set /a a+=1
			)
	)
cd ..
)
echo,succsefully
pause>nul
复制代码

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /b /ad') do (
    set n=0
    for %%i in ("%%a\*.*") do (
        set /a n+=1
        ren "%%i" "%%a_!n!%%~xi"
    )
)
复制代码

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /b /ad') do (
    set n=10000
    for %%i in ("%%a\*.*") do (
        set suffix=!n:~-2!
        if "!suffix!" equ "00" (
            set "newname=%%a%%~xi"
        ) else (
            set "newname=%%a_!suffix!%%~xi"
        )
        ren "%%i" "!newname!"
        set /a n+=1
    )
)
复制代码