[megaloman]

sway38, Лучше бы Вы изложили задачу, а не демонстрировали трабл.
У Вас есть путь к папке в переменной %p%
Вы ищете все файлы по маске. В переменной %%b получаете полные пути
К именам исходных файлов впереди прибавляется имя папки шестого уровня вложенности, в том числе и для файлов, расположенных более глубоко, или пробел, если такого уровня вложенности у файла нет.
Смысл задачи в этом случае от меня ускользает

Вопросы:
1. Что, те файлы, которые переименовываются, расположены на самом низком уровне вложенности (у Вас он =6)?
Или надо рассматривать только файлы на 6 уровне вложенности?
2. В именах папок и непереименованных файлов возможны пробелы?

[sway38]

задача такая. Есть папка с названием (ХХХХ) в ней файлы и папки(имена этих папок роли не играют) с файлами. Нужно добавить имя папки с названием (ХХХХ) к именам файлов внутри этой папки и файлам внутри папок вложенных в эту папку. Сделать так чтобы при нажатии на батник несколько раз имя папки не добавлялось несколько раз к именам файлов, а менялось только если изменилось имя папки с названием (ХХХХ). Проблема в том что количество вложенных папок везде разное, поэтому 6 уровней вложенности. Объяснил как смог... Вот как на картинке, если меняется BTS38-151GUL26, то батник меняет имя его и во всех вложенных файлах, не дублируя!

[megaloman]

Код:

@Echo Off
Set "BoxIn=Z:\Box_Arc\xxxx"
Set "Mask="*.dwg" "*.xlsx""

For /R "%BoxIn%" %%f In (%Mask%) Do Call :DirFile "%BoxIn%" "%%f" "%%~nxf" 
GoTo :Eof

:DirFile
	For /F "tokens=1,2 delims=#" %%i IN (%3) DO (
		If "%%j"=="" Ren %2 "%~nx1#%~3" &&Exit /B 0
		If /I "%%i#"=="%~nx1#" Exit /B 0
		If /I Not "%%i#"=="%~nx1#"  Ren %2 "%~nx1#%%j" &&Exit /B 0
	)
Exit /B 1

[alpap]

sway38
допустим вот так
значит к именам всех файлов вглубь меняющей имя папки "papkaA" (на данном этапе) будет добавлено имя этой папки через знак нижнего подчеркивания (пример: было "file1.txt" стало "papkaA_file1.txt"). Этот знак вынес в переменную на случай, если он уже присутствует в именах файлов, то использовать его нельзя и надо заменить на другой допустимый в именах, например: "-"

Код:

@echo off
set "sh=_"
call :# "papkaA"
pause& exit

:#
 setlocal enabledelayedexpansion
  if exist "%~1" for /f "delims=" %%f in ('dir /a-d/b/s "%~1"') do set "nf=%%f"& echo "%%f"|>nul find "%sh%" && ren "%%f" "%~1%sh%!nf:*%sh%=!" || ren "%%f" "%~1%sh%%%~nxf"
 endlocal
exit /b

т.е. после запуска можете поменять имя основной папки на "papkaB" и запустить повторно, у всех файлов (а они примут вид: "papkaA_file1.txt" после первого запуска) имя изменится на: "papkaB_file1.txt"
(кодировка у меня везде 866 и не забываем про "_", перед первым запуском его не должно быть в именах файлов)

[sway38]

megaloman, Почему то при добавлении имени папки к имени файла получается Имяпапки#Имяфайла. А можно сделать так чтобы не нужно было заходить в батник и менять путь ручками, а просто кинул батник в папку с файлами которые нужно исправить и он сам брал имя папки в которой лежит?

[sway38]

alpap, не фунциклирует

[alpap]

кинул батник в папку с файлами »

Код:

@echo off
set "sh=_"
set "d=%~dp0"

setlocal enabledelayedexpansion
 for %%a in ("%d:~0,-1%.") do set "np=%%~nxa"
 for /f "delims=" %%f in ('dir /a-d/b/s "."^|find /v "%~f0"') do set "nf=%%f"& echo "%%f"|>nul find "%sh%" && ren "%%f" "%np%%sh%!nf:*%sh%=!" || ren "%%f" "%np%%sh%%%~nxf"
endlocal
exit

не фунциклирует »

чем докажете, как запускаете, где, потому что я могу доказать работоспособность своего кода, если надо.

[alpap]

вот папка "papka0" с файлами и bat, помещенному в папку
Файл 153068
после 1го запуска
Файл 153069
изменил имя папки на "papkaA"
Файл 153070
запуск уже в этой папке
Файл 153071

[sway38]

хмм ну по юзерски))) создал .txt внутри папки где переименовываются файлы, открыл через notepad++, вставил код, 866, save .bat. двойной клик. И ничего не изменилось. Можно прописать для каких типов файлов в папке нужно переименование? .dwg, .xlsx

https://c.radikal.ru/c18/1806/ee/1f6db040fc7b.jpg