Dear All

I was busy with some other work but i have menage to solve the problem.

ActiveX script when creating DTS package is...

Function Main()

 Dim ca

 Set ca = CreateObject( "COMAdmin.COMAdminCatalog" )

 ca.ShutdownApplication("COM component")

 Main...