[megaloman]

sway38,

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

Пожалуйста.

Код:

@Echo Off
rem Set "BoxIn=Z:\Box_Arc\xxxx"

Set "BoxIn=%~dp0"
If "%BoxIn:~-1%"=="\" Set "BoxIn=%BoxIn:~0,-1%"

Set "Mask="*.dwg" "*.xlsx""

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

:DirFile
	For /F "tokens=1* 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

Я решил, что пробел - слишком часто встречается в имени и определить, добавлено ли к имени файла имя папки вряд ли представляется возможным, если имя папки прибавлять через пробел. Поэтому поставил #.
Слегка подправил цикл для надёжности.

[sway38]

Я решил, что пробел - слишком часто встречается в имени и определить, добавлено ли к имени файла имя папки вряд ли представляется возможным, если имя папки прибавлять через пробел. Поэтому поставил #. Слегка подправил цикл для надёжности. »

В имени папки не будет пробелов, а вот имя файла должно начинаться с пробела Итоговый вид должен быть Имяпапки - Имя, где " - Имяфайла". # можно его убрать совсем как то из имени файла?

[megaloman]

2. В именах папок и непереименованных файлов возможны пробелы? »

Например: тра ля ля.dwg
тра это имя папки, или кусок имени непереименованного файла?

Надо через пробел - извольте. Криво отработает пробел в имени файла - я не виноват

Код:

@Echo Off
Set "Delim= "

Set "BoxIn=%~dp0"
If "%BoxIn:~-1%"=="\" Set "BoxIn=%BoxIn:~0,-1%"

Set "Mask="*.dwg" "*.xlsx""

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

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

[alpap]

Можно прописать для каких типов файлов в папке нужно переименование? .dwg, .xlsx »

да

Код:

@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 "*.xlsx" "*.dwg"^|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

[sway38]

Надо через пробел - извольте. Криво отработает пробел в имени файла - я не виноват »

Вот то что надо! Спасибо

[sway38]

А можно еще в этот батник одну функцию дописать?
Нужно чтобы в папке где лежит батник он находил файл ***** - Параметры.xlsx узнавал его путь и вставлял его в первую строку файла config.cfg, лежащего здесь же в папке.
https://b.radikal.ru/b25/1806/5f/560e3771913e.jpg