Kill a process avec un autre user

Kill a process avec un autre user - VB/VBA/VBS - Programmation

Marsh Posté le 10-02-2006 à 18:50:50    

Je suis administrateur et je souhaite tuer un process qui tourne sous un user "toto" (compte limite) en vbscript.
 
J'ai essayé le code suivant:
 
Sub KillPid(id)
 'Wscript.Echo "Call killPid with pid= " & id
 Set Service = GetObject( _
     "winmgmts:{impersonationLevel=impersonate, (Debug)}" )
 Dim objWMIService,colProcesses,objProcess,return
  Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2" )
 Set colProcesses = objWMIService.ExecQuery("SELECT * FROM Win32_Process WHERE Handle = '" & id & "'" )
 For Each objProcess in colProcesses
  return = objProcess.Terminate()
 next
End Sub
 
Terminate() retourne 2.
 
J'ai lu sur le net que l'on pouvait utiliser SeDebugPrivilege .....
 
Merci pour votre aide
 

Reply

Marsh Posté le 10-02-2006 à 18:50:50   

Reply

Marsh Posté le 17-02-2006 à 10:38:33    

si tu es admin, tu as normalement le droit de killer un process quelle que soit le compte utilisé. Normalement ce script fonctionne parfaitement chez m oi (scriptcenter):
 
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
 
Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where Name = 'NomDuProcess.exe'" )
 
For Each objProcess in colProcessList
    objProcess.Terminate()
Next


---------------
Envie de scripting ? Lisez donc "Scripting Windows" aux Editions Eyrolles ! tout pour apprendre le scripting orienté infrastructure Microsoft, en français dans les textes et exemples.  http://www.eyrolles.com/Informatiq [...] 212116922/
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed