VBScript: ошибка создания объекта

Ниже приведены случаи, когда я пытался создать объект экземпляра «COMAdmin.COMAdminCatalogCollection». Но я получаю сообщение об ошибке:

   "Microsoft VBScript runtime error: ActiveX component can't create object: 'COMAdminCatalogCollection'"

Код:

dim aa,bb,cc
set aa = new ActiveXObject("COMAdmin.COMAdminCatalogCollection")
'Set bb =  Createobject("COMAdmin.COMAdminCatalogCollection")
'set cc =   Createobject("COMAdminCatalogCollection")

Я понятия не имею об экземпляре «COMAdmin.COMAdminCatalogCollection», я пытался найти dll для регистрации, чтобы решить проблему, но ничего не нашел в Интернете.

Заранее спасибо.


person PC_Oil    schedule 13.10.2014    source источник


Ответы (1)


Попробуйте получить коллекцию из COMAdminCatalog

Set objCatalog = CreateObject("COMAdmin.COMAdminCatalog")
Set oTSCol = objCatalog.GetCollection("TransientSubscriptions")
Set objCatalog = nothing
person Laky    schedule 13.10.2014