Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум
Имя пользователя:
Пароль:
 

Название темы: [решено] Переименование файлов с заменой символов по маске
Показать сообщение отдельно

Аватара для El Sanchez

Ветеран


Contributor


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

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

Цитата mozg777:
в одних файлах jpeg (*.jpg) заменить _ на ~~ »
mozg777,
Код: Выделить весь код
@Echo Off
Set Source=C:\Source

For %%A In ("%Source%\*.jpg") Do Call :_Func "%%~nxA"
GoTo :EoF

:_Func
	Set FileName=%~n1
	Ren "%Source%\%~1" "%FileName:_=~~%%~x1"
Цитата mozg777:
В других после шестого символа вставить ~~ »
mozg777,
Код: Выделить весь код
@Echo Off
Set Source=C:\Source

For %%A In ("%Source%\*.jpg") Do Call :_Func "%%~nxA"
GoTo :EoF

:_Func
	Set FileName=%~n1
	If Not "%FileName:~5%"=="" Ren "%Source%\%FileName%%~x1" "%FileName:~0,6%~~%FileName:~6%%~x1"
Это сообщение посчитали полезным следующие участники:

Отправлено: 12:25, 02-02-2011 | #24

Название темы: [решено] Переименование файлов с заменой символов по маске