Backup-Skript für Robocopy mit datumsabhängigen Zielverzeichnissen

::---Tagesabhängiges Backup-Skript für unterschiedliche Ziellaufwerke (nicht getestet - Anwendung erfolgt auf eigene Verantwortung!)


@Echo off & setlocal


::----Definition der Konstanten



::--------hier: Dateipfad Robocopy

SET RC_path="C:\WINDOWS\SysWOW64\ROBOCOPY.EXE"  




::--------hier: Quellverzeichnisse (Exemplarisch...)

SET Quelle='C:\Dokumente'  




::--------hier: Zielverzeichnisse (Exemplarisch...)

SET bck_Mo='E:\Montag_Donnerstag\Montag'  
SET bck_Di='E:\Montag_Donnerstag\Dienstag'  
SET bck_Mi='E:\Montag_Donnerstag\Mittwoch'  
SET bck_Do='E:\Montag_Donnerstag\Donnerstag'  
SET bck_Fr='E:\Kalenderwoche'  
SET bck_Monatsende='E:\Monatssicherung'  




::--------hier: Neu anzulegende Verzeichnisse für Kalenderwochen- und Monatssicherung

SET KW_bckdir=%bck_Fr%\%OSKW%.KW_%%JJ%_%MM%_%TT%
SET MM_bckdir=%bck_Monatsende%\%MM%.Monatsende_%%JJ%_%MM%_%TT%




::--------hier: anzuwendende Robocopy-Parameter

SET Log_dir="C:\Log-Files\Backups\Robocopy\"  

SET Log_filename=%Log_dir%%cDoW%_%JJ%_%MM%_%TT%.log

SET Copy_MoDo=/MIR /COPYALL /DCOPY:T /A

SET Copy_Fr=/MIR /COPYALL /DCOPY:T

SET Optionen=/R:0 /W:0 /NP / TEE /LOG+:%Log_filename%




::----Programmanfang



::-------Datumsabfrage zwecks späterer Verteilung Kopieraufträge
::-------Aufruf des Programms zur Datumsabfrage aus Bibers Tutorial, zu finden unter www.administrator.de/Workshop_Batch_for_Runaways_Part_III_Datums-_und_Zeitvariablen_im_Batch.html

Call GetAllDateTimeInfos /s /q




::--------hier: Abfrage des jeweils aktuellen Wochentages mit anschlie?ender Ausführung des Backups für die Tage Montag bis Donnerstag (werden im Wochenwechsel immer wieder überschrieben)

if %cDoW%==Mo ECHO Heute ist Montag, der %TT% %MM% %JJ%
%RC_path% %Quelle% %bck_Mo% %Copy_MoDo% %Optionen%

if %cDoW%==Di ECHO Heute ist Dienstag, der %TT% %MM% %JJ%
%RC_path% %Quelle% %bck_Di% % Copy_MoDo % %Optionen%

if %cDoW%==Mi ECHO Heute ist Mittwoch, der %TT% %MM% %JJ%
%RC_path%%Quelle% %bck_Mi% % Copy_MoDo % %Optionen%

if %cDoW%==Do ECHO Heute ist Donnerstag, der %TT% %MM% %JJ%
%RC_path%%Quelle% %bck_Do% % Copy_MoDo % %Optionen%

if %cDoW%==Sa echo Heute ist Samstag
if %cDoW%==So echo Heute ist Sonntag


::--------hier: Abfrage des Wochentages => Freitags erfolgt eine separate Sicherung in einen neuen, noch zu erstellenden Ordner mit der jeweils aktuellen Kalenderwoche

if %cDoW%==Fr ECHO Heute ist Freitag, der %TT% %MM% %JJ% und wir befinden uns in der %OSKW% Kalenderwoche

md %KW_bckdir%

%RC_path%%Quelle% %bck_Fr% % Copy_Fr% %Optionen%




::--------hier: Abfrage, ob das aktuelle Datum dem Monatsletzten entspricht => falls ja, wird ein neues Verzeichnis mit dem Monatsdatum erstellt und es erfolgt eine zusätzliche Sicherung
::--------Anmerkung: bei LastDayOfMonth.vbs wird ermittelt, welches der, vom aktuellen Datum aus gesehen, Monatsletzte ist.

for /f %%i in ('cscript //nologo LastDayOfMonth.vbs') do set "Letzter=%%i"   
if "%date%"=="%Letzter%" echo Heute Monatssicherung  
if not "%date%"=="%Letzter%" echo Heute ist NICHT der Moantsletzte - keine Sicherung erforderlich  

md %MM_bckdir%

%RC_path%%Quelle% %bck_Monatsende% % Copy_Fr% %Optionen%



Call GetAllDateTimeInfos /u


::----Ende des Programms
:END

'-------LastDayOfMonth.vbs  

If WScript.arguments.count = 1 Then  
   dDate=WScript.arguments.item(0)  
  Else  
    dDate=Date 
End If        
Wscript.echo dateAdd ("d", -1, dateAdd("m", 1, "01." & Month(dDate) & "." &year(ddate)))  

rem for /f %%i in ('cscript //nologo LastDayOfMonth.vbs') do set "Letzter=%%i"   
if "%INDate%"=="%LDoM%" echo Heute Monatssicherung  
if not "%INDate%"=="%LDoM%" echo Heute ist NICHT der Moantsletzte - keine Sicherung erforderlich  

[...]
SET "AllDateTimeVars=DateOrder KW OSKW DoW DoY cDoW DD TT MM JJ YY hh min ss ms LDoM cMM"  
[...]

[...]
IF defined MM (
set "MM=%MM:~-2,2%"  
IF %MM%==01 Set "cMM=Januar"  
IF %MM%==02 Set "cMM=Februar"  
IF %MM%==03 Set "cMM=März"  
IF %MM%==04 Set "cMM=April"  
IF %MM%==05 Set "cMM=Mai"  
IF %MM%==06 Set "cMM=Juni"  
IF %MM%==07 Set "cMM=Juli"  
IF %MM%==08 Set "cMM=August"  
IF %MM%==09 Set "cMM=September"  
IF %MM%==10 Set "cMM=Oktober"  
IF %MM%==11 Set "cMM=November"  
IF %MM%==12 Set "cMM=Dezember"  
)
[...]