Effettuare lo shutdown di un package MTS con uno script ASP
Con lo script di oggi continuiamo il discorso su MTS e la gestione remota dei component COM, già trattata in altri script che trovate in calce a questo numero.
Con questa funzione è possibile arrestare (effettuare uno Shutdown) un package presente sotto MTS.
Arrestando un package abbiamo la possibilità di eliminare una DLL che ad esempio abbiamo modificato e che necessita quindi che nessuna istanza dell'oggetto sia presnte in memoria.
Lo Shutdown effettua proprio questa operazione: elimina tutte le istanze dell'oggetto in memoria.
Come unico parametro da passare a questa funzione è necessario specificare il nome del Package su cui effettuare lo shutdown.
<%
Function ShutdownPackage(packageName)
ShutdownPackage = False
'Recupero della collezione dei Packages presenti sotto MTS
Set catalog = Server.CreateObject("MTSAdmin.Catalog.1")
Set packages = catalog.GetCollection("Packages")
packages.Populate
'Cerchiamo il package che abbiamo ricevuto come paramnetro
numPackages = packages.Count
For i = numPackages - 1 To 0 Step -1
If packages.Item(i).Value("Name") = packageName Then
'Se lo troviamo ne recuperiamo l'ID associato
Set ci = packages.Item(i)
Response.Write ci.Name
strPackageGUID = ci.Key
Exit for
End If
Next
'in caso il package sia stato trovato effettuiamo lo ShutDown
If strPackageGUID <> "" Then
Set packagesUtil = packages.GetUtilInterface
packagesUtil.ShutdownPackage (strPackageGUID)
ShutdownPackage = True
Else
'in caso contrario ritorniamo un messaggio di errore
Response.Write "Package non trovato: " & packageName
ShutdownPackage = False
End If
End Function
%>Per approfondire la questione si veda:
#332 - Creare un package MTS con uno script ASP
https://www.aspitalia.com/liste/usag/script.aspx?ID=332
#335 - Aggiungere un componente COM ad un package MTS da una pagina ASP
https://www.aspitalia.com/liste/usag/script.aspx?ID=335
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.
