Листинг 1

:: TestShareCorrespondence.bat
	
:: Set your logfile location here.
::Задайте путь к файлу журнала
Set Output=D:RoboMigrationlog.txt
:: Set your source server location here.
:: Задайте имя сервера-источника
Set SourceSrvr=ServerA
:: Set your destination server location here.
:: Задайте имя сервера-приемника
Set DestSrvr=ServerB
:: Set RmtShare utility location here. No spaces in path please!
:: Задайте путь к утилите RmtShare не допускайте пробелов при вводе пути
Set RmtShareLoc=C:RMTSHARE.EXE
:: Note shares with spaces in the share name are not captured by this script
::Совместно используемые ресурсы с пробелами в имени не обрабатываются этим сценарием
:: *******************************************************************
ECHO Share(s) from %SourceSrvr% that do not exist on %DestSrvr%>»%Output%»
For /f «tokens=1,2,3,4» %%i in (?%RmtShareLoc% \%SourceSrvr%^|Find /V «Remark»^
 |Find /I /V «——-»^|Find /I /V «successfully.»^|findstr /V /B /R «[a-zA-Z]$»^
 |sort?) do if not exist «\%DestSrvr%\%%i» echo %%i>>»%Output%»
Start Notepad «%Output%»
Pause
GOTO :EOF
:: The commented out code below this point is to check the inverse of the above:
:: Раскомментируйте следующий код для проверки ресурсов на сервере-приемнике, отсутствующие на сервере-       :: источнике
:: ECHO.>>»%Output%»
:: ECHO.>>»%Output%»
:: ECHO Share(s) from %DestSrvr% that do not exist on %SourceSrvr% >»%Output%»

:: for /f «tokens=1,2,3,4» %%i in (?RMTSHARE.EXE \%DestSrvr%^|Find /V «Remark»^
 |Find /I /V «——-»^|Find /I /V «ADMIN$»^|Find /I /V «successfully.»^|Find /I 
 /V «recycler»^|findstr /V /B /R «[a-zA-Z]$»^|sort?) do if not exist «\%SourceSrvr%\%%i» 
 echo %%i>>»%Output%»
:: start notepad «%Output%»
:: pause
:: GOTO :EOF