manman89

Simple End Process - VBS - WSCRIPT

May 1st, 2013
191
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.62 KB | None | 0 0
  1. https://sites.google.com/site/khuvuonxanh
  2.  
  3. === End Process By TASKKILL.EXE ===
  4.  
  5. Dim Exec, oShell
  6. Set oShell = CreateObject("Wscript.Shell")
  7.  
  8. Dim INTWINDOWSTYLE, BWAITONRETURN
  9.  
  10. INTWINDOWSTYLE = 0
  11. BWAITONRETURN = True
  12.  
  13. Exec = oShell.Run("%SYSTEMROOT%\SYSTEM32\TASKKILL.EXE /F /IM EXPLORER.EXE", INTWINDOWSTYLE, BWAITONRETURN)
  14.  
  15. === End Process By OBJECT WINMGMTS ===
  16.  
  17. Dim oServ, cProc, oProc
  18. Set oServ = GetObject("winmgmts:")
  19. Set cProc = oServ.ExecQuery("Select * from Win32_Process")
  20. For Each oProc In cProc
  21. If UCase(oProc.Name) = "EXPLORER.EXE" Then oProc.Terminate()
  22. Next
  23.  
  24. ====
  25.  
  26. Have a nice day © ManMan89
Advertisement
Add Comment
Please, Sign In to add comment