Fijar el objWMIService = GetObject (“winmgmts: ¡” y “{impersonationLevel=impersonate}! \ \” y “.” y “\ raíz \ cimv2”)
Fijar el objShell = CreateObject (“Wscript.Shell”)
KillProcess (““processA.exe” ")
KillProcess (““processB.exe” ")
KillProcess (““processC.exe” ")
strMSI = “MSI2Execute.msi”
En curriculum vitae del error después
¡objShell.Run objShell.ExpandEnvironmentStrings (“%WINDIR%") y” \ System32 \ msiexec /I” &strMSI y " /qb-! “, 1, verdad
En el error 0 indicado
KillProcess secundario (strProcess)
En curriculum vitae del error después
Fijar los colProcess = objWMIService.ExecQuery (“seleccionar * de Win32_Process donde nombre =” y los strProcess)
Para cada objProcess en colProcess
objProcess.Terminate ()
Después
En el error 0 indicado
Submarino del extremo
|