Script per la gestione dei Package COM+

Dopo aver visto come automatizzare alcune operazioni in IIS come ad esempio la creazione di un Application Pool e l'associazione di tale pool ad una determinata Virtual Directory, vediamo ora come automatizzaze la gestione dei package COM+.

Per farlo abbiamo a disposizione un Object Model su cui è stata realizzata la stessa console di amministrazione di COM+ ("Component Services" o "Servizi Componenti" nella versione italiana). Vediamo come creare un nuovo Package COM+ in vbscript. 

Per prima cosa dobbiamo istanziare l'oggetto COMAdminCatalog che ci permette di accedere al catalogo COM+:

Dim catalog: Set catalog = CreateObject("COMAdmin.COMAdminCatalog")

a questo punto dobbiamo ottenere la collezione dei packages (Applications):

Dim applications: Set applications = catalog.GetCollection("Applications")

Il metodo Add della collezione crea un oggetto Application e ritorna il suo riferimento:

Dim oNewApplication: Set oNewApplication = applications.Add

A questo punto impostiamo le proprietà desiderate e salviamo l'oggetto:

oNewApplication.Value("Name") = sPackageName
oNewApplication.Value("ApplicationAccessChecksEnabled") = False

Dim retCode
retCode = applications.SaveChanges()

Per un elenco delle proprietà dell'oggetto Application cliccate qui.

A scopo di esempio ho realizzato uno script vbs che permette:

  • La creazione di un Package
  • La cancellazione di un Package
  • L'aggiornamento di un attributo di un Package
  • La visualizzazione di un attributo di un Package
  • L'assegnazione di un Componente ad un Package
  • L'impostazione delle credenziali (identity) con cui si esegue il Package
  • Configurare il Package come servizio

Per maggiori informazioni potete consultare [MSDN] Automating COM+ Administration.

dmpCom+.vbs