批处理 将文件夹内所有的文件名 生成文件夹名

批处理 将文件夹内所有的文件名 生成文件夹名
谢谢

@echo off &setlocal enableDelayedExpansion
rem 设置源目录
set "ScDir=D:\test"

cd /d "%ScDir%"
for /f  "delims=" %%a in ('dir /a-d /s /b') do (
    set "DirName=%%~dpa"
    set "DirName=!DirName:~0,-1!"
  if not defined $!DirName! ( 
    set "$!DirName!=!DirName!"&set/a sum=1
  ) else (set/a sum+=1)   
  for /f  "delims=" %%b in ("!DirName!") do set "DirName=%%~nb"
  if !sum! LEQ 9 ( set "filename=!DirName!-0!sum!%%~xa" ) else ( set "filename=!DirName!-!sum!%%~xa" )   
  ren "%%a" "!filename!"
)

pause&exit

@echo off&color 2&title 文件移动到同名文件夹 setlocal enabledelayedexpansion cd for %%i in (*.txt) do ( set x=%%~ni md !x! move %%i !x! ) endlocal cls echo 已将文件移动到同名文件内，按任意键退出。 pause>nul exit #经过测试不存在问题，如果需要处理更多格式的文件在括号 内添加*.*即可#