Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 2735
Благодарности: 1699

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
@Echo Off
	Call :DelSuff "Z:\Box_In\F-LDR*__My.*" "__My"
	Call :AddSuff  "Z:\Box_In\F-LDR*.*" "__My"
Exit /B

:DelSuff
	FOR /F "usebackq delims=" %%d IN (`2^>nul Dir %1 /S /B /A:D ^|Sort /R`) DO (
		Set "N=%%~nd" &Call Ren "%%d" "%%N:__My=%%%%~xd"
	)
Exit /B

:AddSuff
	FOR /F "usebackq delims=" %%d IN (`2^>nul Dir %1 /S /B /A:D ^|Sort /R`) DO (
		Call Ren "%%d" "%%~nd%~2%%~xd"
	)
Exit /B

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 13-05-2020 в 16:47.

Это сообщение посчитали полезным следующие участники:

Отправлено: 16:25, 13-05-2020 | #16