使用批處理腳本自動將最新文件複製到文件夾

我想呼籲幫助我嘗試創建一個腳本，該腳本會自動檢查上次修改的文件並將其傳輸到目標。使用批處理腳本自動將最新文件複製到文件夾

我有這樣的：

@Echo Off 
Set _Delay=1 
for /f "tokens=1,2,3 delims==" %%a in (config.ini) do (
if %%a==source set _Monitor=%%b 
if %%a==destination set _Dest=%%b 
if %%a==timer set _Timer=%%b 
) 
Set _Base=%temp%\BaselineState.dir 
Set _Chck=%temp%\ChkState.dir 
Set _OS=6 
Ver|Findstr /I /C:"Version 5">Nul 
If %Errorlevel%==0 Set _OS=5 & Set /A _Delay=_Delay*1000 
Goto :_Xfer 
:_StartMon 
@echo off 
SET R1=Start /w Sync1.vbs 
Call :_SetBaseline "%_Base%" "%_Monitor%" 
:_MonLoop 
If %_OS%==5 (Ping 1.0.0.0 -n 1 -w %_Delay%>Nul) Else Timeout %_Delay%>Nul 
Call :_SetBaseline "%_Chck%" "%_Monitor%" 
FC /A /L "%_Base%" "%_Chck%">Nul 
If %ErrorLevel%==0 Goto _MonLoop 
:: 
for /l %%a in (%_Timer%,-1,0) do (
@Echo:::::::::::::::::::::::::::::::::::::::::::::: 
@Echo:: SEC Auto Transfer :: 
@Echo:: Aizal 16 June 2012 :: 
@Echo:::::::::::::::::::::::::::::::::::::::::::::: 
@Echo This script will scan SEC Data Folder for 
@Echo new files every 30 minutes and will copy 
@Echo it to the Server. Make sure you set correct 
@Echo folder before using this script. 
ECHO. 
ECHO Currently recording: 
FOR /F %%a in ('xcopy "%_Monitor%\*.SEC" "%_Dest%" /L /Y') DO (
IF NOT EXIST "%_Dest%.\%%~nxa" ECHO %%~nxa 
) 
ECHO Refreshing... 
ECHO Please wait %%a seconds... 
%R1% 
cls 
) 
:: 
:_Xfer 
FOR /F %%a in ('xcopy "%_Monitor%\*.SEC" "%_Dest%" /L /Y') DO (
IF NOT EXIST "%_Dest%.\%%~nxa" xcopy "%%a" "%_Dest%" /Y 
) 
:: 
Echo.Change Detected 
ECHO. 
Goto :_StartMon 
::::::::::::::::::::::::::::::::::::::::::::::::::: 
:: Subroutine 
::::::::::::::::::::::::::::::::::::::::::::::::::: 
:_SetBaseline 
If Exist "%temp%\tempfmstate.dir" Del "%temp%\tempfmstate.dir" 
For /F "Tokens=* Delims=" %%I In ('Dir /S "%~2"') Do (
Set _Last=%%I 
>>"%temp%\tempfmstate.dir" Echo.%%I 
) 
>"%~1" Findstr /V /C:"%_Last%" "%temp%\tempfmstate.dir" 
Goto :EOF

現在，你是否注意到，該腳本將源文件夾中的內容比較的目標文件夾的內容，並且將文件從源複製，如果沒有已文件在目的地。我想知道是否有人可以幫我弄清楚如何讓腳本檢查源文件夾中最後一個修改過的文件，並將其複製到目的地，如果所述文件當前正在使用/正在寫入，那麼腳本將等待直到它完成，然後再次嘗試複製它。

另外，現在我必須編輯source.ini文件來指定我要監視的文件夾，並且每次我必須更改子文件夾路徑以監視更改，是否有一種方法可以觀察父文件夾是否有新的文件並將該文件帶到目的地？

我在網上發現了這個腳本，但希望檢查文件不是基於一天而是基於時間。

::Copy Files Made Or Modified Today 
@echo off 
setlocal 
set source= <source directory> 
set dest= <destination directory> 
pushd "%source%" 
set t=%date:~4% 
::for /f %%a in ('dir /b /a-d /o-d') do call :PROCESS "%%a" 
goto :eof 
popd 
:PROCESS 
for /f %%j in ('echo %~t1') do set d=%%j 
if "%d%"=="%t%" copy %1 "%dest%" 
goto :eof

希望從這裏找到解決方案。

非常感謝

來源

2012-06-17 Astronyu

考慮過的robocopy？它支持來自命令行的監視，鏡像和重試 –

我知道xcopy已經過時，但我確信它仍然可以完成？沒有？ – Astronyu

您可以從xp資源工具包中下載xp版本 –

有了這個，你會得到最後修改的文件：

for /f %%A in ('dir /b /tw /o-d not-mandatory-file-mask') do (
    set last_file=%%A 
    goto :endloop 
) 
:endloop

有了這個，你會複製文件，如果它是可能的。如果不是，它會一次又一次地嘗試：

:tryagain 
set /a errorlevel=0 
copy some_dir\%last_file% %destination% 
if %errorlevel% NEQ 0 (
    sleep 10 
    goto :tryagain 
) else (
    goto :end 
) 
:end

來源

2012-11-22 20:54:18 npocmaka

使用批處理腳本自動將最新文件複製到文件夾

回答

相關問題