metalx1000

Windows Batch get Download Image File

Jun 5th, 2020
535
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. echo dim xHttp: Set xHttp = createobject("Microsoft.XMLHTTP") > go.vbs
  2. echo dim bStrm: Set bStrm = createobject("Adodb.Stream") >> go.vbs
  3. echo xHttp.Open "GET", "https://filmsbykris.com/v7/img/tux.png", False >> go.vbs
  4. echo xHttp.Send >> go.vbs
  5. echo with bStrm >> go.vbs
  6. echo     .type = 1  >> go.vbs
  7. echo     .open >> go.vbs
  8. echo     .write xHttp.responseBody >> go.vbs
  9. echo     .savetofile "someimage.png", 2  >> go.vbs
  10. echo end with >> go.vbs
  11. cscript go.vbs
  12. del go.vbsc
RAW Paste Data