求一个BAT的批处理命令，实现双击后将其所在文件夹及所有子文件夹下的所有文件重命名保留前六个字符。

@echo off
for /f "delims=" %%a in ('dir /b/a-d') do (
set str=%%~na
setlocal enabledelayedexpansion
set "pre=!str:~0,6!"
ren "%%a" "!pre!%%~xa"
endlocal
)
我这里有一个BAT批处理的命令，但是双击后只能改其所在文件夹这一级的文件名，但是改不了子文件夹里的，求高手指点修改一下上面的命令实现连同所有子文件夹下的所有文件一起修改

@echo off
for /f "delims=" %%a in ('dir /a-d /b /s') do (
set str=%%~na
setlocal enabledelayedexpansion
set "pre=!str:~0,6!"
ren "%%a" "!pre!%%~xa"
endlocal
)用dir /a-d /b /s显示所有子文件夹的文件名不就得了