• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Список Баз На Сервере

makaset

Well-known member
14.03.2007
126
0
BIT
0
привет Всем.
как можно вытащить список баз на сервера. делаю
Set directory = New NotesDbDirectory( "ServNames" )
Dim tmp As NotesDatabase
Set tmp = directory.GetFirstDatabase( DATABASE )
он вытаскивает все базы включая папки, а мне надо только спсиок баз без файлов внутри папок
 

Domino-Designer

Людям надо поморгать!
Lotus Team
06.12.2011
616
223
BIT
9
эээ... т.е. только те, что в директории Data? Data\Help не годится?
Странный вопрос, тогда отсеивай не нужные по признаку NotesDataBase.FilePath
 

savl

Lotus Team
28.10.2011
2 599
311
BIT
193
makaset
посмотри базу catalog.nsf, лежит в корне каждого сервака.
 

ToxaRat

Чёрный маг
Green Team
06.11.2007
3 332
42
BIT
0
а в чём проблема при переборе сделать проверка на база это или нет?
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!