[Iska]

Скрытый текст

Код:

@echo off
setlocal enableextensions enabledelayedexpansion

set sSourceFilePath=%~1
set sSourceFileName=%~nx1

if defined sSourceFilePath (
	if exist "%sSourceFilePath%" (
		set sLastPart=%sSourceFileName:*_=%
		call set sFirstPart=%%sSourceFileName:!sLastPart!=%%
		
		set sYear=!sLastPart:~0,4!
		set sMonth=!sLastPart:~4,2!
		set sDay=!sLastPart:~6,2!
		set sExt=!sLastPart:~8!
		
		set sNewFileName=!sFirstPart!!sDay!.!sMonth!.!sYear!!sExt!
		
		echo Rename [%sSourceFilePath%] into [!sNewFileName!]
		ren "%sSourceFilePath%" "!sNewFileName!"
	) else (
		echo Can't find source file [%sSourceFilePath%].
		exit /b 2
	)
) else (
	echo Usage: %~0 ^<Source file^>
	exit /b 1
)

endlocal
exit /b 0

Путь к целевому файлу указывается параметром пакетного файла. Также можно просто перетащить целевой файл на пакетный файл в Проводнике.