Btach zum erstellen Regelmäsiger Backups mit WinRar

Das Script holt sich die Datein aus dem gewünschten Verzeichniss und übergibt sie an Winrar dieses schreibt dan die Daten als Backup auf das Zielverzeichnis (in meinem Fall eine Usb-Festplatte)

Das Script holt sich die Datein aus dem gewünschten Verzeichniss und übergibt sie an Winrar dieses schreibt dan die Daten als Backup auf das Zielverzeichnis (in meinem Fall eine Usb-Festplatte)

Zu beachten ist:
rar.exe muss im selben Verzeichnis wie das Script sein.
der NachrichtenDienst muss aktiv sein / als alternative könnte man die msg befehle dur echo ersetzen

@echo off
title BackUp
rem ###### KONFIG ######
set ziel="F:\DesktopBackup"  
set quelle="C:\Users\weber7\Desktop"  
set anzahlbackups=3
rem ####################

if not exist %ziel% md %ziel%
if errorlevel 1 goto error1

if not exist %quelle% goto error2

if not exist %ziel%\*-*.rar echo none > %ziel%\1-start.rar
set c=0

:1
if %c%==%anzahlbackups% goto error3
set /a c+=1

if not exist %ziel%\%c%-*.rar goto 1
move /y %ziel%\%c%-*.rar %ziel%\%c%.rar
if %c%==%anzahlbackups% set c=0
set /a c+=1
rar.exe a -rr -rv1 -k -ri0 %ziel%\%c%-%date%.rar %quelle%

goto e

rem ###### ERRORCODES ######
:error1
msg %username% BACKUP_ERROR1: Kann keine Daten auf den Datenträger %ziel% schreiben.
goto e
:error2
msg %username% BACKUP_ERROR2: Die angegäbenen Quelle exsistiert nicht.
goto e
:error3
msg %username% BACKUP_ERROR3: Es fehlt die neuset Bakup Datei oder Die Anzahl der Backup Datein ist zu niedrig.
goto e
rem ########################

rem script made by: Zef
:e

Ich habe den Code ein bischen überarbeitet da die zu backupenden Datein jetzt schon die 10 GB Marke überschreiten und dadurch der Laptop wehren des backups ausgeschaltet wird oder die USB-Festplatte abgezogen wird.
Es legt jetzt einen Ordner für die unfolständigen rar-Archife an und informiert beim nächsten mal das dass Backup abgebrochen wurde.
Zudem muss man noch ein kleines vbs Script in den Ordner in dem die BackUp.bat ligt einfügen für eine Bestätigungs Fenster das mitteilt das das Backup vertig ist.

BackUp.bat

@echo off
title BackUp
rem ###### KONFIG ######
set ziel=F:\DesktopBackup
set quelle=C:\Users\weber7\Desktop
set anzahlbackups=3
rem ####################

if not exist %ziel% md %ziel%
if errorlevel 1 goto error1

if not exist %quelle% goto error2

if exist *.rar.bug del *.rar.bug

if not exist %ziel%\*-*.rar echo none > %ziel%\1-start.rar
set c=0

:1
if %c%==%anzahlbackups% goto error3
set /a c+=1

if not exist %ziel%\%c%-*.rar goto 1

set cc=%c%

if %c%==%anzahlbackups% set c=0
set /a c+=1
if exist log msg %username% < log
echo BACKUP_ERROR4: am %date% wurde das BackUp unterbrochen >> log
rar.exe a -rr -rv1 -k -ri0 %ziel%\%c%-%date%.rar.bug %quelle%

move /y %ziel%\%cc%-*.rar %ziel%\%cc%.rar
move /y %ziel%\%c%-%date%.rar.bug %ziel%\%c%-%date%.rar

del log
okmsg.vbs

goto e

rem ###### ERRORCODES ######
:error1
msg %username% BACKUP_ERROR1: Kann keine Daten auf den Datentraeger %ziel% schreiben.
goto e
:error2
msg %username% BACKUP_ERROR2: Die angegaebenen Quelle exsistiert nicht.
goto e
:error3
msg %username% BACKUP_ERROR3: Es fehlt die neuste Bakup Datei oder Die Anzahl der Backup Datein ist zu niedrig.
goto e
rem ########################

rem script made by: Zef
:e

okmsg.vbs

Set WshShell = WScript.CreateObject("WScript.Shell")  
BtnCode = WshShell.Popup("Daten wurden gesichert.", 2, "BackUp-Script")   
If BtnCode = vbNo Then WScript.Quit(1) 

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Kommentar vom Moderator Biber am 19.03.2010 um 17:28:31 Uhr

Codetags nachgezogen

Kommentar vom Moderator Dani am 20.03.2010 um 01:28:52 Uhr

Den Kurztext nochmals als normalen Text hinzugefügt. Damit Google auch was zum Indexieren hat.

Content-ID: 138687

Url: https://administrator.de/contentid/138687

Ausgedruckt am: 22.11.2024 um 07:11 Uhr

2 Kommentare

Neuester Kommentar

Btach zum erstellen Regelmäsiger Backups mit WinRar

Tach,

Kannst du vielleicht bitte ein paar Kommentar Zeilen dazu schreiben und evtl. mal die schreibFehler ausbügeln?

Zeile

4&5 - - da wären ein paar "" nicht ganz verkehrt
25 - daß rar im Pfad sein muß und %c%-%date%.rar evtl. bei dem einen oder anderen zu Nebenwirkungen führen könnte.
welche Dienste eingeschaltet sein müssen und wo die Nachrichten ankommen, wenn das von einem Systemaccount/Scriptjobuser erledigt wird.
34 & 37

Dann würde ich auch ein + spendieren.

Gruß und weiter so.