[DJ Mogarych]

Ребята, осваивайте уже Powershell, ну сколько можно стюардессу-то выкапывать?

Код:

# variables
$x = 5
$log = "d:\temp\moved.txt"

# process
$filesToMove = dir "D:\temp\images\*.png" |sort CreationTime |select -SkipLast $x
$filesToMove |mv -Destination "D:\temp\images2"

# log
get-date |Out-File "$log" -Encoding default -Append
$filesToMove |ft |Out-File "$log" -Encoding default -Append

[megaloman]

Код:

@Echo Off
	>>"e:\Movied.log" Echo ==== %Date% %Time% 
	Call :MoveOld "Z:\Box_In" "Z:\Box_Arc" "work_*.*" 3 "e:\Movied.log"
Exit /B

:MoveOld
	FOR /F "usebackq skip=%4 delims=" %%d IN (`2^>nul Dir "%~1\%~3" /B /A:-D /O:-N`) DO (
		>>%5 Echo Move /Y "%~1\%%d" "%~2\"
		>nul 2>>%5 Move /Y "%~1\%%d" "%~2\"
	)
Exit /B

[blacks2]

FOR /F "usebackq skip=%4 delims=" %%d IN (`2^>nul Dir "%~1\%~3" /B /A:-D /O:-N`) DO ( »

megaloman Огромное вам спасибо!

[megaloman]

blacks2, Только сейчас осознал

кроме Х штук последних »

Как понять? Сейчас последние по имени (/O:-N в Dir), а если надо по дате/времени последнего изменения, то вместо этого ключа надо /O:-D /T:W. Возможно имена у Вас содержат дату-время в корректном формате, например, ГГГГММДДччммсс, тогда это неважно.