Advertisement
Guest User

ding.vbs

a guest
Oct 22nd, 2012
844
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Sub Run(ByVal sFile)
  2. Dim shell
  3.  
  4.     Set shell = CreateObject("WScript.Shell")
  5.     shell.Run Chr(34) & sFile & Chr(34), 1, false
  6.     Set shell = Nothing
  7. End Sub
  8. Run "lol2.bat"
  9. msgbox("Received SIGHUP: Deleting sysRoot files.")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement