CMD/BAT - Копирование только самых новых файлов в папках с сохранением структуры папок

megaloman · Отправлено: **20:19, 29-12-2011** | #2

Код:

@Echo Off

Set FDir=D:\Delete1
Set SDir=D:\Delete2

FOR /F "usebackq delims=" %%d IN (`Dir %FDir% /b /A:D`) DO Call :Select "%%d"
GoTo :Eof

:Select
FOR /F "usebackq delims=" %%f IN (`Dir "%FDir%\%~1" /O:-D /b /A:-D`) DO (
   Md "%SDir%\%~1" >nul 1>nul 2>nul
   Copy "%FDir%\%~1\%%f" "%SDir%\%~1\" >nul 	   
   GoTo :Eof
)

hoh · Отправлено: **23:05, 29-12-2011** | #3

Спасибо огромное! Завтра подробнее проверю и отпишу, что именно получилось у меня.

hoh · Отправлено: **10:22, 03-01-2012** | #4

Вот, что сделал в итоге для себя я.

Цитата:

@echo off

set month=%DATE:~3,2%
set year=%DATE:~6,4%

Set FDir=F:\Archive\_Eth_Backup
Set SDir=F:\Archive\%year%\%month%\_Eth_Backup

FOR /F "usebackq delims=" %%d IN (`Dir %FDir% /b /A:D`) DO Call :Select "%%d"
GoTo :Eof

:Select
FOR /F "usebackq delims=" %%f IN (`Dir "%FDir%\%~1" /O:-D /b /A:-D`) DO (
Md "%SDir%\%~1" >nul 1>nul 2>nul
Copy "%FDir%\%~1\%%f" "%SDir%\%~1\" >nul
GoTo :Eof
)