Quero copiar o arquivo mais recente de uma pasta e de suas subpastas para um novo local.

O código a seguir funciona bem, MAS eu não quero filtrar por Data E Hora (/ O: D), mas somente DATA, para que todos os arquivos mais recentes da mesma data sejam copiados para o novo local dos arquivos mais recentes.

FOR /F "delims=|" %%I IN ('DIR "D:\Backups\DB\*.bak" /B /O:D /S') DO SET NewestFile=%%I
copy "%NewestFile%" "D:\Backups\DB\Latest"

Solução

O script em lotes a seguir utiliza o forfilescomando, que não está disponível por padrão no Windows XP. Se esse for o sistema operacional usado, você deverá fazer o download manualmente . Embora a sintaxe seja semelhante, não é idêntica .

@echo off

REM set the working directory
pushd "D:\Backups\DB"

REM get the latest modified .bak file
for /f "delims=" %%G in ('dir *.bak /b /o:-d /s 2^>nul') do (

REM copy the newest files
call :copyNewest %%G "Latest"

REM restore the previous working directory
popd
goto:EOF
)

:copyNewest
setlocal

REM make sure there's something to copy
if "%~1" == "" exit /b

REM check output folder
if "%~2" == "" exit /b

REM get the file path
set filePath=%~dp1

REM strip the trailing backslash char
set filePath=%filePath:~0,-1%

REM copy latest files which share the same date
for /f "delims=" %%G in ('"forfiles /p "%filePath%" /m "%~nx1" /c "cmd /c echo @fdate""') do (
forfiles /p "%cd%" /m *.bak /s /c "cmd /c echo @relpath | findstr /i /c:"\%~2" >nul || copy @path "%cd%\%~2" >nul" /d %%G
)
endlocal & exit /b