     

Favorite      ,       .   : 

    (\\SERVER\e$ \Exchange)
     (   (\\SERVER\e$ \Departments))
   ,              



rem *******************
rem            
rem *******************
SET DRIVE1ST=d:
SET DRIVE2ND=e:

rem *******************
rem   
rem *******************
SET PASSWD=qmsdhgsdfgsdfhdsfhsdhf

rem *******************
rem       
rem *******************
rem SET COPYTO=\\shpakk\c$ \!backup

rem ********************
rem ***    
rem ********************
%DRIVE1ST%
if not exist \!backup md \!backup
if not exist \!backup\Departments md \!backup\Departments
if not exist \!backup\Exchange md \!backup\Exchange
if not exist \!backup\MEDEA_rdisk md \!backup\MEDEA_rdisk
cd \!backup

rem ******************************
rem *** Backup \\SERVER\e$ \Exchange
rem ******************************
SET DIRNAME=Exchange
SET FILENAME=SERVER_Exchange
SET SOURCEDIR=e:\Exchange
rar a -r -m5 -dh -x*.mp3 -x*.fcd -x*.avi -x*.zip -x*.rar -x*.exe -w%DRIVE2ND%\ -p%PASSWD% %DIRNAME%\%FILENAME%_new %SOURCEDIR%\*.*
if not exist %DIRNAME%\%FILENAME%_new.rar goto next2
del %DIRNAME%\%FILENAME%_old.rar
ren %DIRNAME%\%FILENAME%.rar %FILENAME%_old.rar
ren %DIRNAME%\%FILENAME%_new.rar %FILENAME%.rar
copy %DIRNAME%\%FILENAME%.rar %COPYTO%\%DIRNAME%

:next2
rem ***************************
rem *** Backup \\SERVER\e$ \Users
rem ***************************
SET DIRNAME=Departments
SET FILENAME=SERVER_Departments
SET SOURCEDIR=e:\Departments
if not exist %DIRNAME%\%FILENAME%_new.rar goto next3
del %DIRNAME%\%FILENAME%_old.rar
ren %DIRNAME%\%FILENAME%_4.rar %FILENAME%_old.rar
ren %DIRNAME%\%FILENAME%_3.rar %FILENAME%_4.rar
ren %DIRNAME%\%FILENAME%_2.rar %FILENAME%_3.rar
ren %DIRNAME%\%FILENAME%_new.rar %FILENAME%_2.rar
:next3
rem *******************
rem      -   -v357888k
rem *******************
rem rar a -r -m5 -v357888k -dh -x*.mp3 -x*.fcd -x*.avi -x*.exe -w%DRIVE2ND%\ -p%PASSWD% %DIRNAME%\%FILENAME%_new %SOURCEDIR%
rem *******************
rem  ,    
rem *******************
rar a -r -dh -x*.mp3 -x*.fcd -x*.avi -x*.exe -x*.jpg -x*.tif -p%PASSWD% %DIRNAME%\%FILENAME%_new %SOURCEDIR%
goto next4

:next4
rem **********************************
rem *** Create repair disk on \\SERVER
rem **********************************
SET DIRNAME=MEDEA_rdisk
SET FILENAME=MEDEA_rdisk
SET SOURCEDIR=%windir%\repair
%windir%\system32\rdisk.exe /s-
rar a -r -m5 -dh -w%DRIVE2ND%\ -p%PASSWD% %DIRNAME%\%FILENAME%_new %SOURCEDIR%\*.*
if not exist %DIRNAME%\%FILENAME%_new.rar goto next5
del %DIRNAME%\%FILENAME%_old.rar
ren %DIRNAME%\%FILENAME%.rar %FILENAME%_old.rar
ren %DIRNAME%\%FILENAME%_new.rar %FILENAME%.rar
copy %DIRNAME%\%FILENAME%.rar %COPYTO%\%DIRNAME%

:next5



   3 : 

Departments,  :
SERVER_Departments_2.rar - 2  
SERVER_Departments_3.rar - 3  
SERVER_Departments_4.rar - 4  
SERVER_Departments_new.rar - 
SERVER_Departments_old.rar -  

Exchange
    -             
SERVER_Exchange.rar
SERVER_Exchange_old.rar 

      
SERVER_rdisk
SERVER_rdisk.rar
SERVER_rdisk_old.rar

     

   bat-,   ( )      : 

pslist.exe -e ""
if %errorlevel%==1 start "" "" 

pslist -  ,    .

        

              , , .      : 

MD %SYSTEMDRIVE%\%date:~-10% 

            .    ,            .   ,     : 

md %systemdrive%\%date:~0,2%_%date:~3,2%_%date:~6,4% 

 

md %systemdrive%\%date:~6,4%_%date:~3,2%_%date:~0,2% 

  ,     . 

 ,        : 

@echo off
for /F "tokens=1-4 usebackq delims=. " %%1 in (`date /t`) do set mydate=%%4.%%3.%%2
ren test.txt test%mydate%.txt 

  test.txt    test2005.03.05.txt


    bat-  ? 

   bat-,         .           bat-  ,     bat-   . 

     : 

:loop
... <-        ,     
goto loop 

      . ,   ping: 

ping -n 1 -w 100000 192.168.254.254 >nul 

-n 1 -   
-w 100000 -   100  (   )
192.168.254.254 - IP ,       , ..     ping
>nul -     ping  .


  bat-      ? 

      . ,   ping: 

ping -n 1 -w 100000 192.168.254.254 >nul 

-n 1 -   
-w 100000 -   100  (   )
192.168.254.254 - IP ,       , ..     ping
>nul -     ping  .

   sleep.exe  .
