Класс COMAdminCatalogCollection
Представляет любую коллекцию в каталоге COM+. Используйте его для перечисления, добавления, удаления и извлечения элементов в коллекции, а также для доступа к связанным коллекциям.
Когда следует реализовать
Этот класс реализуется с помощью COM+.
| Требование | Значение |
|---|---|
| Интерфейсы | ICatalogCollection |
Назначение
Используйте объекты, созданные из класса COMAdminCatalogCollection , если требуется программно управлять коллекцией в каталоге COM+. Эти коллекции соответствуют папкам в средстве администрирования служб компонентов. Элементы в папках соответствуют элементам в коллекциях, которые можно представить с помощью объектов, созданных из класса COMAdminCatalogObject .
Сведения о коллекциях в каталоге и их свойствах см. в разделе Коллекции администрирования COM+.
Общие сведения о программном администрировании COM+ см. в статье Автоматизация администрирования COM+.
Комментарии
Невозможно напрямую создать объект COMAdminCatalogCollection . Чтобы использовать методы этого объекта, необходимо создать объект COMAdminCatalog , получить ссылку на ICOMAdminCatalog, а затем использовать ICOMAdminCatalog::GetCollection , чтобы получить ссылку на интерфейс ICatalogCollection , представляющий коллекцию верхнего уровня. Это показано в следующем примере, где TopCollection необходимо заменить именем одной из коллекций администрирования COM+ верхнего уровня.
HRESULT hr = CoCreateInstance(CLSID_COMAdminCatalog, NULL,
CLSCTX_INPROC_SERVER, IID_IUnknown, (void**)&pUnknown);
if (FAILED (hr)) exit(0); // Replace with specific error handling.
hr = pUnknown->QueryInterface(IID_ICOMAdminCatalog,
(void**)&pCatalog);
if (FAILED (hr)) exit(0); // Replace with specific error handling.
hr = pCatalog->GetCollection(L"TopCollection",
(IDispatch**)&pTopColl);
if (FAILED (hr)) exit(0); // Replace with specific error handling.
Чтобы использовать этот класс из Microsoft Visual Basic, добавьте ссылку на библиотеку типов COM+ Администратор. Объект COMAdminCatalogCollection можно создать, вызвав Метод GetCollection для объекта COMAdminCatalog . Это показано в следующем примере, где TopCollection необходимо заменить именем одной из коллекций администрирования COM+ верхнего уровня.
Dim objCatalog As COMAdmin.COMAdminCatalog
Set objCatalog = CreateObject("COMAdmin.COMAdminCatalog")
Dim objTopCollection As COMAdmin.COMAdminCatalogCollection
Set objTopCollection = objCatalog.GetCollection("TopCollection")
Требования
| Требование | Значение |
|---|---|
| Минимальная версия клиента |
Windows 2000 Professional [только классические приложения] |
| Минимальная версия сервера |
Windows 2000 Server [только классические приложения] |
| Заголовок |
|
| IDL |
|