FUNCTION KillAcrobat() loCIMV2 = GetObject("winmgmts://localhost/root/cimv2") loProcesses = loCIMV2.ExecQuery("SELECT * FROM Win32_Process WHERE Name = 'Acrobat.exe'") IF loProcesses.Count > 0 For Each objProcess in loProcesses objProcess.Terminate(0) NEXT ENDIF RETURN ENDFUNC