[Foreigner]

Код:

@echo off
setlocal

for /f "tokens=1-3 delims=_" %%i in ('dir /b *_*_*.doc') do (

	set "name=%%i"
	set "year=%%j"
	set "data=%%~nk"	

)

echo %name%
echo %year%
echo %data%

[Elven]

Код:

for /F %%i in ('dir /b /a:-d') do for /f "tokens=1-3 delims=_" %%A in ("%%~ni") do echo %%A %%B %%C