Question

求做一dos批处理程序

求做一dos批处理程序，一个文件夹内有若干子文件夹，每个子文件夹内都有一个文件，要求把这个文件名改成它所属文件夹的名（父栏目名），扩展名不改。

Answer 1

@Echo Off&Setlocal Enabledelayedexpansion
for /f "delims=" %%i in ('dir /s /b /a-d "R:\新建文件夹"') do (
Set pt=%%~dpi&Set pt=!pt:~,-1!
For /f "tokens=*" %%j in ("!pt!") do (
Set pt=!pt:%%~dpj=!
Echo Ren "%%i" "!pt!"%%~xi
Ren "%%i" "!pt!"%%~xi))
Pause

追问

好用，能不能再稍改下，不要写入文件所在路径，我把批处理放在文件夹内运行比较方便。

Answer 2

for /f "delims=" %%a in ('dir /a-d/s/b "d:\mulu"') do (
move %%a "%%~dpa.%%~xa"
move "%%~dpa.%%~xa" "%%~dpa"
)

追问

这个是改名的吗？

追答

@echo off
cd /d %~dp0
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /a-d/s/b "mulu"') do (
set f=%%~dpa
move "%%~a" "!f:~,-1!%%~xa"
move "!f:~,-1!%%~xa" "%%~dpa"
)
pause