Ms-Dos - Backup - Copiado Acumulativo

FOR /?

SET /?

FC  /?

@echo off

SET Orig=C:\Mis Documentos\Origen

SET Dest=Z:\Backup\Documentos

cd "%Orig%"

FOR %%a IN (*.*) DO CALL :Copiar %%a

GOTO:EOF

:Copiar

   SET File=%1

   IF EXIST "%Dest%\%File%" GOTO Compara

   GOTO Copiar

:Compara

   FC "%Orig%\%File%" "%Dest%\%File%"

   IF ErrorLevel 1 GOTO Copiar

   GOTO:EOF

:Copiar

   XCOPY "%Orig%\%File%" "%Dest%\%File%" /V /C /Y

   IF ERRORLEVEL 1 GOTO Mal

      ECHO Copia %File% - Correcta.

      GOTO:EOF

:Mal

   ECHO Copia %File% - Error

   GOTO:EOF

@echo off

SET Orig=A:

SET Dest=B:

cd "%Orig%"

FOR %%a IN (*.*) DO CALL :Copiar %%a

GOTO:EOF

:Copiar

  SET File=%1

  IF EXIST "%Dest%\%File%" GOTO Compara

  GOTO Copia

:Compara

  FC "%Orig%\%File%" "%Dest%\%File%"

  IF ErrorLevel 1 GOTO Copia

  GOTO:EOF

:Copia

  XCOPY "%Orig%" "%Dest%" /S /E /D /Y /C /H

  IF ERRORLEVEL 1 GOTO Mal

     ECHO Copia %File% - Correcta

     GOTO:EOF

:Mal

  ECHO Copia %File% - Error

  GOTO:EOF