Foro de elhacker.net

Programación => Scripting => Mensaje iniciado por: RubenLL en 27 Agosto 2012, 20:57 pm



Título: como matar proceso en remoto vbscript
Publicado por: RubenLL en 27 Agosto 2012, 20:57 pm
Hola buenas tardes, tengo un script que mata un proceso en local el tema es que yo quiero matarlo en otro equipo, el problema esta cuando quiero pasarle una variable con el nombre del equipo, no lo acepta porque si pongo
strComputer = equipo
no recoge bien la variable nombreequipo al invocarlo el script, parece ser que tiene que estar en comillas pero si pongo la variable en comillas lo toma como texto.. no se si me he explicado. nombreequipo toma un valor diferente(esta en bucle) por eso quiero hacerlo asi..

Gracias

Código
  1. 'ProcessKillLocal.vbs
  2. «Muestra VBScript para matar a un programa
  3. 'Autor Guy Thomas http://computerperformance.co.uk/
  4. "Versión 2.7 - Diciembre 2010
  5. '------------------------------------------------- ------ '
  6. Option Explicit
  7. ObjWMIService Dim, objProcess, colProcess
  8. StrComputer Dim, strProcessKill
  9. strComputer = "."
  10. strProcessKill = "" calc.exe "
  11.  
  12. Establecer objWMIService = GetObject ("winmgmts:" _
  13. & "= {ImpersonationLevel impersonate}! \ \" _
  14. Y strComputer & "\ root \ cimv2")
  15.  
  16. Establecer colProcess = objWMIService.ExecQuery _
  17. ("Select * from Win32_Process WHERE nombre =" & strProcessKill)
  18. For Each objProcess en colProcess
  19. objProcess.Terminate ()
  20. Próximo
  21. WScript.Echo "acaba de matar a proceso" & _ strProcessKill
  22. Y "on" y strComputer
  23. WScript.Quit
  24. 'Fin del Ejemplo WMI de un proceso de Kill
  25.  
  26.  
  27.  
  28.