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

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

Ветеран


Contributor


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

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


Если очень хочется, то извольте:
Код: Выделить весь код
@Echo Off

Set "BoxIn=Z:\Box_In"
Set Mask="guten tag 2 - *." "guten tag kuku 2 - *.exe" "hello world - *." "hello world - *.txt" "windows 3 - *." "windows kuku 3 - *.uuu"  

:Begin
	Set "NewEnd="
	SET /P NewEnd=Input new ending simbols :
	If "%NewEnd%"=="" GoTo :Eof
	Call :FileRen "%NewEnd%" "%BoxIn%" %Mask%
	rem GoTo :Begin
GoTo :Eof

:FileRen
	:BeginRen
	If "%~3"=="" GoTo :Eof
	FOR /F "usebackq tokens=1 delims=*" %%f IN ('%~n3') DO Set "OldName=%%f"
	FOR /F "usebackq tokens=1 delims=*" %%f IN ('%~3') DO Set "OldName=%%f"
	FOR %%f IN ("%~2\%~3") DO Ren "%%f" "%OldName%%~1%%~xf"
	Shift /3
	GoTo :BeginRen
GoTo :Eof
Маски файлов могут быть с расширениями. Имена файлов без расширения должны завершаться точкой.

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


Последний раз редактировалось megaloman, 07-04-2018 в 20:36.

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

Отправлено: 16:39, 07-04-2018 | #3