На сервере приложений есть служебная папка C:\Program Files\1cv82\srvinfo\reg_1541\ в которой хранятся журналы регистраций всех баз, которые когда-либо были приписаны к этому серверу. Для каждой БД создается отдельная подпапка с названием равным id БД.
При удалении БД с сервера приложении 1С, подпапка
не удаляется автоматически. Для удалении подпапки приходится искать id БВ
в файле 1CV8Reg.lst
и удалять подпапку если id нет.
Чтоб понять какие базы больше не используются будем искать ее id в файлике 1CV8Reg.lst, который находится тут же и содержит все активные БД, зарегистрированне на сервере приложений. @echo off IF NOT EXIST 1CV8Reg.lst GOTO :Err FOR /D %%i in ("????????-????-????-????-????????????") DO Call:Sub %%i echo Ok! Unused folders deleted! pause GOTO :EOF :Err echo Error! File 1CV8Reg.lst doesn't exist in current folder! echo You should run this script in echo the C:\Program Files\1cv82\srvinfo\reg_1541\ pause GOTO :EOF :Sub findstr %~1 1CV8Reg.lst > nul if errorlevel 1 (echo Remove %~1 ...) if errorlevel 1 (RD /s /q %~1) GOTO :EOF Скрипт следует запускать в папке C:\Program Files\1cv82\srvinfo\reg_1541\.
Первым делом идет
проверка наличия файла 1CV8Reg.lst, если его нет, то прекратит работу, чтоб
избежать удалением всех папок. Далее идет перебор папок с вызовом для каждой
процедуры. Скрипт ищет подстроку в файле 1CV8Reg.lst, и удаляем всю
папку, если подстрока не найдена.
|