@echo off
echo Simple backup script by Deniss (deniss at fuckoff.com) 2003

set WORKDRIVE=d:
set WORKDIR=\gramatvediba\temp
set FILEDIR=\gramatvediba\dbf
set SHAREDRIVE=s:
set REMOTESHARE=\\laguna\temp
set PASS=aaa
set USER=deniss
set REMOTEDIR=\as

echo ------= Starting Backup at >>%WORKDRIVE%%WORKDIR%\backup.log
date /t >>%WORKDRIVE%%WORKDIR%\backup.log
time /t >>%WORKDRIVE%%WORKDIR%\backup.log
%WORKDRIVE%
cd %WORKDIR%
echo Creating archive... >>%WORKDRIVE%%WORKDIR%\backup.log
%WORKDIR%\rar.exe a -ag -ep1 -idp -ilog%WORKDRIVE%%WORKDIR%\backup.log -m5 -ow -r -s- %WORKDRIVE%%WORKDIR%\gramatvediba %WORKDRIVE%%FILEDIR%\*.db? >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
net use %SHAREDRIVE% /delete >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
echo Mounting share... >>%WORKDRIVE%%WORKDIR%\backup.log
net use %SHAREDRIVE% %REMOTESHARE% %PASS% /user:%USER% >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
if errorlevel 1 goto fail
%SHAREDRIVE%
cd %REMOTEDIR%
IF not EXIST prev6 mkdir prev6
IF not EXIST prev5 mkdir prev5
IF not EXIST prev4 mkdir prev4
IF not EXIST prev3 mkdir prev3
IF not EXIST prev2 mkdir prev2
IF not EXIST prev1 mkdir prev1
IF not EXIST prev mkdir prev
IF not EXIST last mkdir last
echo Moving old copies... >>%WORKDRIVE%%WORKDIR%\backup.log
del prev6\*.* /f/q 
move prev5\*.* prev6\ >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
del prev5\*.* /f/q
move prev4\*.* prev5\ >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
del prev4\*.* /f/q
move prev3\*.* prev4\ >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
del prev3\*.* /f/q
move prev2\*.* prev3\ >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
del prev2\*.* /f/q
move prev1\*.* prev2\  >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
del prev1\*.* /f/q
move prev\*.* prev1\  >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
del prev\*.* /f/q
move last\*.* prev\ >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
del last\*.* /f/q
echo Moving new copy... >>%WORKDRIVE%%WORKDIR%\backup.log
move %WORKDRIVE%%WORKDIR%\gramatvediba*.rar %SHAREDRIVE%%REMOTEDIR%\last\ >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
%WORKDRIVE%
cd %WORKDIR%
net use %SHAREDRIVE% /delete >>%WORKDRIVE%%WORKDIR%\backup.log 2>&1
goto end
:fail
del *.rar
echo !!!! Mounting remote share failed !!!! >>%WORKDRIVE%%WORKDIR%\backup.log
:end