Компьютерные заметки DJ Slava

Можно заменить отдельные слова в имени файла. Это особенно полезно, когда файлов - много, а переименовывать по одному - долго. chcp 1251 Set Source= <Здесь имя папки, где переименовывать файлы. Например "C:\Source"> For %%A In ("%Source%\*. <РАСШИРЕНИЕ_ФАЙЛА> ") Do Call :_Func "%%~nxA" GoTo :EoF :_Func Set FileName=%~n1 Ren "%Source%\%~1" "%FileName: <ЧТО_ЗАМЕНИТЬ> = <ЧЕМ_ЗАМЕНИТЬ> %%~x1" Пример: chcp 1251 Set Source=C:\PHOTO For %%A In ("%Source%\*.jpg") Do Call :_Func "%%~nxA" GoTo :EoF :_Func Set FileName=%~n1 Ren "%Source%\%~1" "%FileName:IMG=ФОТОГРАФИЯ%%~x1" Пишем в Блокноте, сохраняем файл с окончанием "*.bat". Спасибо форуму:  http://forum.oszone.net/post-1602582.html#post1602582