[Vanadiy777]

NLOLegion, а программа Advanced Renamer не подойдет Вам для этих задач?
Она, вроде, умеет это все делать.

[NLOLegion]

Vanadiy777, может быть, но иметь скрипт на рабочем столе на который мышью кинуть папку будет удобнее. На этом форуме был подобный метод с формированием папок по дате - использую его активно. Теперь вот сами файлы надо переименовать. И отсутствие программы будет более удобно. При условии, что кто-то мне поможет...

[megaloman]

иметь скрипт на рабочем столе на который мышью кинуть папку будет удобнее »

Код:

@Echo Off
cls
	Set "Mask=*.*"

	If "%~1"=="" (Echo !!! The Folder name is missing in the bat-file Argument !!! &Pause &Exit /B 1)
	Pushd "%~1" || (Echo !!! Folder "%~1" Not Found!!! &Pause &Exit /B 2)
	Popd
	
	Set "BoxIn=%~1"
	If "%BoxIn:~-1%"=="\" Set "BoxIn=%BoxIn:~0,-1%

	FOR /F "usebackq tokens=2,3,4,5,6,7* delims=:. " %%i In (`Where /T "%BoxIn%":"%Mask%" ^|FindStr /V /R "\\20[0-9][0-9][0-1][0-9][0-3][0-9]_[0-2][0-9][0-5][0-9][0-5][0-9]_"`) DO (
		Ren "%%o" "%%k%%j%%i_%%l%%m%%n_%%~nxo"
	)
Pause
Exit /B