bat——vbs——批处理——编程语言——文件夹内有多级文件夹，把每个文件夹名作为该文件夹下文件前缀

Question

D:\a 文件夹内有多级文件夹，把每个文件夹名作为该文件夹下文件前缀，用“——”连接，从最里层的文件开始，依次添加前缀—————######### 比如：D:\a\b\c\d\e\文本文档.txt———把a文件夹拖入到bat内，文本文档.txt的名称变成a——b——c——d——e——文本文档.txt #########————当然每个文件夹里不止一个文件夹和文件，所以麻烦bat高手啦，本人非常需要这个，求助bat大神，在此献上100分！

Answer 1

@echo off
cd /d d:\a
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /s /a-d /b') do (
pushd "%%~dpi"
set "x=%%i"
set "y=!x:%cd%=a!"
if not "%%~nxi"=="run.bat" ren "%%~nxi" "!y:\=——!"
popd)
把上面的代码放在名为run.bat的bat档中，执行之

Answer 2

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /a-d /b /s "%~1" ') do (
set "prefix=%%~pa"
if "!prefix:~0,1!"=="\" set "prefix=!prefix:~1!"
set "prefix=!prefix:\=--!"
ren "%%~a" "!prefix!%%~nxa"
)
pause

追问

大神，可否将第一级文件夹名去掉，我想从a文件夹开始，而不是从a文件夹的上级文件夹开始，改下我就立即采纳，麻烦啦

谢谢！

本回答被提问者采纳