Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   Скрипт который скопирует все файлы измененные в определенный период с каталогами (http://forum.oszone.net/showthread.php?t=344151)

ven7 23-02-2020 09:56 2910491

Скрипт который скопирует все файлы измененные в определенный период с каталогами
 
Добрый день, коллеги, нужна помощь. Нужен скрипт который скопирует все файлы вместе со структурой каталогов, в которых они лежали и именно измененные в определенном диапазоне даты например с 5 февраля 2017г. до 10 октября 2019 года. Папка оригинал очень большого размера около 2 Тб (файлы всякие, от текстовых до видео)
В общем результатом должна быть папка со скопированными файлами этого диапазона и каталогами где они лежали. Спасибо. Всех с 23 Февраля!

megaloman 24-02-2020 14:16 2910635

Боюсь, на большом количестве файлов придётся долго ждать
Дата в системе должна быть настроена как дд.мм.гггг
Код:

@Echo Off
cls
        Set "Dt1=17.01.2006"
        Set "Dt2=09.12.2007"

        Set "BoxIn=D:\CMD_Forum\*.*"
        Set "BoxOut=Z:\Box_Out"

        Set /A DDt2=%Dt2:~-4%%Dt2:~3,2%%Dt2:~0,2%
        Set "OutDir=%Dt1:~-4%.%Dt1:~3,2%.%Dt1:~0,2%_%Dt2:~-4%.%Dt2:~3,2%.%Dt2:~0,2%"
        FOR /F "usebackq delims=" %%f IN (`2^>nul Xcopy "%BoxIn%" "%Tmp%" /D:%Dt1:~3,2%-%Dt1:~0,2%-%Dt1:~-4% /S /Y /L`) Do Call :Out "%%f" "%BoxOut%\%OutDir%%%~pf" "%%~tf" %DDt2%
rem pause
Exit /B 0

:Out
        If %3=="" Exit /B 0
        Set "TDt=%~3"
        Set /A TDt=%TDt:~6,4%%TDt:~3,2%%TDt:~0,2%
        If %TDt% GTR %4 Exit /B 0
rem        Echo %1
        >nul Xcopy /Y /D %1 %2

Exit /B

Если хотите наблюдать за процессом, уберите rem перед Echo

ven7 24-02-2020 14:43 2910644

Спасибо большущее, выручили!

:up Спасибо большущее, выручили! То, что долго ждать придется - это понятно, благодарю! :up

ven7 24-02-2020 16:39 2910661

megaloman, Почему то полностью не отрабатывает, заканчивает работу после копирования нескольких вложенных папок? Может из-за русских названий папок или из-за правил безопасности на папки, хотя выполняю под административной учеткой, есть мысли?

megaloman 24-02-2020 17:03 2910665

ven7,
Цитата:

Цитата ven7
Почему то полностью не отрабатывает »

Возможно, в путях спецсимволы, которые Xcopy некорректно обрабатываются. Подозреваю, надо иные средства, чем cmd
Вот вариант скрипта с созданием лог-файла рядом с батником с расширением .log. Хотелось бы посмотреть, где скрипт затыкается.
Код:

@Echo Off
cls
        Set "Dt1=17.01.2006"
        Set "Dt2=09.12.2007"

        Set "BoxIn=D:\CMD_Forum\*.*"
        Set "BoxOut=D:\Box_Out"

        Set /A DDt2=%Dt2:~-4%%Dt2:~3,2%%Dt2:~0,2%
        Set "OutDir=%Dt1:~-4%.%Dt1:~3,2%.%Dt1:~0,2%_%Dt2:~-4%.%Dt2:~3,2%.%Dt2:~0,2%"
        >%~dpnx0.log 2>&1 (FOR /F "usebackq delims=" %%f IN (`2^>nul Xcopy "%BoxIn%" "%Tmp%" /D:%Dt1:~3,2%-%Dt1:~0,2%-%Dt1:~-4% /S /Y /L`) Do Call :Out "%%f" "%BoxOut%\%OutDir%%%~pf" "%%~tf" %DDt2%)
rem pause
Exit /B 0

:Out
        If %3=="" Exit /B 0
        Set "TDt=%~3"
        Set /A TDt=%TDt:~6,4%%TDt:~3,2%%TDt:~0,2%
        If %TDt% GTR %4 Exit /B 0
        Echo ==== Xcopy /Y /D %1 %2
        Xcopy /Y /D %1 %2
Exit /B


ven7 25-02-2020 06:13 2910768

Часть из лог файла, там имена каталогов и самих файлов длинные с пробелами с подчеркиванием итп. Две последние строки из лога являются последними, всего строк 1865. Везде скопировано файлов "0"

Скрытый текст
Скопировано файлов: 0.
==== Xcopy /Y /D "E:\Store\1C_Arenda\Sklad metall ceha 23.xls" "d:\store_out\2018.06.01_2019.10.01\Store\1C_Arenda\"
Скопировано файлов: 0.
==== Xcopy /Y /D "E:\Store\1C_Arenda\Sklad metall OMTS.xls" "d:\store_out\2018.06.01_2019.10.01\Store\1C_Arenda\"
Скопировано файлов: 0.
==== Xcopy /Y /D "E:\Store\Аренда\Регион Развитие\РАЗНОЕ\Сканы объектов\Складской корпус\3 этаж часть 1.pdf" "d:\store_out\2018.06.01_2019.10.01\Store\Аренда\Регион Развитие\РАЗНОЕ\Сканы объектов\Складской корпус\"
Скопировано файлов: 0.
==== Xcopy /Y /D "E:\Store\Аренда\Регион Развитие\РАЗНОЕ\Сканы объектов\Складской корпус\3 этаж часть 2.pdf" "d:\store_out\2018.06.01_2019.10.01\Store\Аренда\Регион Развитие\РАЗНОЕ\Сканы объектов\Складской корпус\"
Скопировано файлов: 0.
==== Xcopy /Y /D "E:\Store\Аукцион\Регион Развитие\СОТРУДНИКИ\Фамилия\СКАНЫ для Дирекции\Эшелон компания продление.pdf" "d:\store_out\2018.06.01_2019.10.01\StoreАукцион\Регион Развитие\СОТРУДНИКИ\Фамилия\СКАНЫ для Дирекции\"
Скопировано файлов: 0.
==== Xcopy /Y /D "E:\Store\Аукцион\Регион Развитие\СОТРУДНИКИ\Фамилия2\Свободные_площади_для_сдачи_в_аренду.xlsx" "d:\store_out\2018.06.01_2019.10.01\Store\Аукцион\Регион Развитие\СОТРУДНИКИ\Фамилия2\"
Скопировано файлов: 0.

megaloman 25-02-2020 09:30 2910775

Цитата:

Везде скопировано файлов "0"
это возможно, если Вы повторно запустили копирование одного и того же каталога с одинаковым периодом времени - /d в xcopy позволяет не перезаписывать имеющиеся файлы, если они не изменялись.


Время: 23:30.

Время: 23:30.
© OSzone.net 2001-