gifts2017

Base Cleaner: чекист файловых баз

Опубликовал Аркадий Кучер (Abadonna) в раздел Программирование - Инструментарий

Как и положено чекисту, отслеживает благонадежность баз и, в случае необходимости, применяет репрессии вплоть до высшей меры социальной защиты ;)

Программа при запуске считывает данные о зарегистрированных базах из файла ibases.v8i.

Далее возможны следующие действия:

Кнопка [Удалить]

1. Включен флажок "удалять ссылку" - просто удаляет базу из списка 1С-стартера (аналогично родной 1С)

2. Включен флажок "удалять кэш" - полностью удаляет папку кэша выбранной базы

3. Включен флажок "удалять каталог базы" - полностью удаляет папку ИБ.

Примечание: учитывая, что действие (3) может быть чревато, предварительно выдаются два грозных предупреждения.

Кнопка [Проверить ссылки]

Проверяет по всему списку баз существует ли файл 1CV8.1CD в каталоге ИБ (например, был удален или каталог переименован). В случае, если каталог не обнаружен, удаляет базу из списка стратера

Контекстное меню позволяет, в частности, определить общий размер папки ИБ и папки кэша.

Программа тестировалась на XP, Windows 7, Server 2008.

Перед использованием обязательно прочтите комментарий (1). 

 

Версия 1.0.1.0

Исправлены баги, отмеченные в комментарии (1). Сразу при старте, на всякий случай, создается резервная копия файла списка баз ibases.v8i -> ibases.bak. Не файловые БД игнорируются в части проверки на существование каталога.

Протестировано Altair777, за что ему большое спасибо

Версия 1.0.1.1

Улучшена информативность списка баз, учтена возможность списка баз с деревом. 

P.S. Ненавижу деревья! ;)

Скачать файлы

Наименование Файл Версия Размер
BaseCleaner1010.zip 33
.zip 330,39Kb
30.07.13
33
.zip 330,39Kb Бесплатно
BaseCleaner1011.zip 24
.zip 330,80Kb
31.07.13
24
.zip 330,80Kb Бесплатно

См. также

Подписаться Добавить вознаграждение
Комментарии
1. Аркадий Кучер (Abadonna) 29.07.13 11:50
Внимание!!! Пока только для файловых, по скульным пока не смотрел, что там в ibases.v8i.
И не проверял, когда базы упорядочены по группам, ибо никогда не упорядочиваю так.
Поэтому для смешанных и с группами кнопку [Проверить ссылки] пока не рекомендую
P.S. На днях подправлю, и приделаю backup перед перезаписью файла ibases.v8i. На всякий случай.
____________________________________________________
P.P.S. Уже подправил (29.07.13: 17:00 Москвы), завтра отдам потестить человеку, у которого есть скульные базы в списке (неохота дома заводить), выложу версию 1.0.1.0


ОПУБЛИКОВАНА 1.0.1.0 протестированная
2. Альтаир (Altair777) 29.07.13 11:52
(1) Abadonna, и кто работает на файловых? :)

Кстати, на какой именно Вин-7 проверялось?
3. Аркадий Кучер (Abadonna) 29.07.13 12:03
(2) Altair777,
и кто работает на файловых? :)

ты отлаживаешься на скульной что ли?
Могу тебе сказать, что из всех наших клиентов в скуле: одна ЗУП, жирная, с вахтами, одна КА. И все.
Только сейчас еще одну КА на скуль переводить буду, потому что за 3 Гига выросла.
Насколько я знаю хохляндию, вы там на контрафакте запросто сидите, вот и понаставили себе скулей (бе-бе-бе)
___________
:)))))))
Один наш общий знакомый:
[IS-QUOTE]Всё у них в конторе ворованное, и даже воздух какой-то спёртый[/QUOTE
;)]
4. Альтаир (Altair777) 29.07.13 12:13
5. Аркадий Кучер (Abadonna) 29.07.13 12:20
(4) Altair777, на серваке? или контрафактик локально поставил? Лично мне в терминалке не нравится, если много делать, я на своем делаю. А контрафакты у нас недопустимы, у меня даже MS Ofice не стоит.
6. Аркадий Кучер (Abadonna) 29.07.13 12:28
(2)
Кстати, на какой именно Вин-7 проверялось?

Windows 7 Ultimate
Windows 7 Professional Service Pack 1
7. Альтаир (Altair777) 29.07.13 12:35
(6) Abadonna, 32 или 64?
Ты же помнишь ?..... ;)
8. Аркадий Кучер (Abadonna) 29.07.13 13:43
(7) Altair777,
Abadonna, 32 или 64?

Ха. Там, где я помню, все и на 64 работало, просто charset был немного не тот. Опять же из-за дурацкой привычки некоторых не уважать Великий и Могучий, а ставить дефолтную раскладку ENG.
(в скобках замечу, что для 1С ENG - полный бред, это для сисадминов хорошо).
Так что тут максимум, что может глючить (и то вряд ли!), "скопировать историю в буффер"
9. Андрей Овсянкин (Evil Beaver) 29.07.13 15:25
Опередил! Делаю сейчас примерно то же самое :)
10. Вадим Иванцов (grum01) 29.07.13 15:27
(3) Abadonna,
и тоже не причина.
У меня база еще в мае перевалила за 10Гб (и так каждый год...),
но на скуль чего-то не хочу - лень.

А КА за 3Гб - это всего лишь около 3-4 тыс.документов.
Учитывая, что она пустая полтонны весит.
--------------------

Теперь по факту:
Не пойму, для чего нужна эта работа?
Какой прок?
11. Аркадий Кучер (Abadonna) 29.07.13 15:51
(10)
Какой прок?

1. Да хотя бы папки кэшей почистить, которые автоматически не удаляются при удалении базы, а место-то они жрут.
2. Не знаю кому как, а мне часто приходится кучу разных конфигураций и баз разворачивать, потом папки грохаешь, а в списке они торчат.
3. Я никогда не пишу то, что лично мне не нужно.

Вот свежая цитата из аськи:

Kasten (15:42:27 29/07/2013)
ну вот у меня в списке 100 баз к примеру из них 30 уже я удалил а ссылки остались в списке

Kasten (15:42:36 29/07/2013)
мне нужно такие взять и уе@ать

12. Павел Ванин (pahich) 29.07.13 15:54
Надо было
Внимание!!! Пока только для файловых, по скульным пока не смотрел, что там в ibases.v8i.
И не проверял, когда базы упорядочены по группам, ибо никогда не упорядочиваю так.
Поэтому для смешанных и с группами кнопку [Проверить ссылки] пока не рекомендую
писать не в комментариях, а в описании. Я, например комментарии редко читаю... Хорошо не много скульных баз.
13. Аркадий Кучер (Abadonna) 29.07.13 16:00
(12) pahich, угу, согласен. Сейчас добавлю в описание ссылку на коммент 1, а завтра просто поправлю, чтобы "не замечала" скульных, и заодно бэкап ibases.v8i перед перезаписью делала
14. Аркадий Кучер (Abadonna) 29.07.13 17:25
(9)
Опередил! Делаю сейчас примерно то же самое :)

Долго делаешь :))) Я вчера начал - вчера и закончил. Как всегда на красоту и иконки больше времени ушло, чем на код ;)
И, тем более, лишняя не помешает, это же не отчет по ДР сотрудников:))) Так что доделывай и выкладывай
15. Андрей Овсянкин (Evil Beaver) 29.07.13 17:30
(14) Abadonna, я еще и не начинал. Записал только состав требований себе, чтобы не забыть )
16. Альтаир (Altair777) 30.07.13 14:45
Не очень красиво выглядят поля "Каталог базы"

Например:
Connect=Srvr=BSRef=zarplata

Лучше бы как-то так:
[SQL] srvr='BS'; ref='zarplata'

А для файловых:
[File] .......
17. Аркадий Кучер (Abadonna) 30.07.13 15:08
(16) Иди на фиг :))) Буду я еще под каждого красоту наводить, при том, что у каждого свои понятия о ней.
Сначала сделай красоту заменой, потом делай обратную замену, чтобы в файле искать. Ради эстетических воззрений Альтаира? ;)
Evil Beaver; +1 Ответить 2
18. Альтаир (Altair777) 30.07.13 16:43
(17) Abadonna,
Ради читаемости. А то ты втулил все нафиг без пробелов - имя сервера сливается с Ref
халтура! :)

А про красоту я вообще молчу... посмеялся над (14)
> Как всегда на красоту и иконки больше времени ушло, чем на код
19. Андрей Краснокутский (Andry.Boris) 30.07.13 23:55
20. Аркадий Кучер (Abadonna) 31.07.13 07:29
(18) Altair777,
А то ты втулил все нафиг без пробелов

Альтаир, а сообразить, что у меня нет варианта посмотреть ibases.v8i, когда там скульная база есть - слабо?
Мне надо было ";" убрать из каталога файловой - я и убрал, а что там в скуле - откуда мне знать?
21. Александр Венгер (venger) 31.07.13 10:33
(0) Вообще, писать на делфях сейчас, все-равно что в 1C 7.7 сидеть;-)
22. Александр Венгер (venger) 31.07.13 11:42
(17)
Буду я еще под каждого красоту наводить, при том, что у каждого свои понятия о ней.


Apple согласилась заплатить за дизайн часов $21 млн
http://www.3dnews.ru/news/637798

Как бы 21-н лям, не думаю, что код этих часов стоил подобную сумму;-)
23. Аркадий Кучер (Abadonna) 31.07.13 11:56
(22)Да сделал я уже и лучше, чем Альтаир хотел. Вот только думаю, как бы опубликовать, чтобы он скачать не смог? :)))
Прикрепленные файлы:
24. Александр Венгер (venger) 31.07.13 13:13
(23) В магазин ее;-) И это, дизайн какой-то не воздушный:-)))) Шучу, конечно:-)))
25. Аркадий Кучер (Abadonna) 31.07.13 13:38
(24)Кстати, дизайн не воздушный, потому что там вообще нет стандартной панели заголовка окна.
Уж шибко она мне не нравится в виндах ниже 7-ки.
Но опрозрачить форму - проблем нет ;)
26. Babys (babys) 21.08.13 13:12
А размеры окон чтобы менялись?
27. Алексей Новоселов (a-novoselov) 21.08.13 13:50
(8)
(в скобках замечу, что для 1С ENG - полный бред, это для сисадминов хорошо)

Да вполне нормальная практика "ENG" по-умолчанию ставить, если 99% паролей в этой раскладке и при запуске любой программы нужна именно она...
28. Аркадий Кучер (Abadonna) 21.08.13 16:43
(27) a-novoselov,
если 99% паролей в этой раскладке

А в моей практике 99% - русские пароли. И почти в любой проге нужна русская. В блокноте нужна английская?, в ворде нужна?, в ёкселе нужна? В моей практике нужна только в IDE Delphi.
29. Аркадий Кучер (Abadonna) 21.08.13 16:46
(26) babys, а зачем? никогда не позволяю пользователям делать то, что можно и не делать ;) специально так окно сделано
30. Babys (babys) 26.08.13 21:39
(29) Баз у меня зарегистрировано, чуть больше чем до ..... И на большом экране разобрать что там понаписано тяжело, и строка скульного пути полностью не отображается, ....

Да ещё замечание, не показывает задвоенные или затроенные базы (и имя и путь полностью совпадают) :)
31. Аркадий Кучер (Abadonna) 27.08.13 12:34
(30) babys,
(и имя и путь полностью совпадают) :)

А как это удалось? Руками что ли правил?
Прикрепленные файлы:
32. Babys (babys) 30.08.13 00:15
(31) Abadonna, никак нет. Сначала создал базы на 1 сервере, создал файлы v8i. Потом поднял те же базы на 2 сервере, ну и файлики v8i соответственно.А потом админы забыли меня исключить из скрипта :)
33. Babys (babys) 05.09.13 15:16
Abadonna, ещё есть вопрос, работа фичи "В случае, если каталог не обнаружен, удаляет базу из списка стратера" без вопросов и предупреждений это религиозный порыв? :)
34. Аркадий Кучер (Abadonna) 05.09.13 15:23
(33) babys, я атеист ;)
Для того и делалась, в первую очередь, чтобы погрохать без всяких-яких из списка базы, у которых нет каталога.
35. Babys (babys) 12.09.13 15:57
(34) Abadonna, ну хоть спросить, у меня есть базы работающие с мобильного диска. Восстанавливать их потом, не комильфо.