API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Nov 15th, 2019
209
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.55 KB | None | 0 0
raw download clone embed print report
  1. Set WshShell = WScript.CreateObject("WScript.Shell")
  2.  
  3. strName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )
  4.  
  5. x=msgbox ("Warming: The file you have opened is not safe and has traces of malware and viruses attached, Click abort to close the program, Click retry to try to open the program again, Click ignore to ignore the problem and continue " ,2+16, "Windows Virus Detector")
  6. WScript.sleep 1000
  7. msgbox "Intrusion detected attempting to remove files!",48,ERROR
  8. WScript.sleep 400
  9. msgbox "Unable to remove files!",ERROR
  10.  
  11.  
  12. WScript.sleep 2000
  13. msgbox "Sytem failure in %WINDIR%",48,ERROR
  14. WScript.sleep 1000
  15. WshShell.Run "cmd"
  16. WScript.sleep 400
  17. WshShell.sendkeys "cls"
  18. WScript.sleep 200
  19. wshShell.sendkeys "{ENTER}"
  20. wshshell.sendkeys "A"
  21. WScript.sleep 200
  22. wshshell.sendkeys "r"
  23. WScript.sleep 200
  24. wshshell.sendkeys "e"
  25. WScript.sleep 200
  26. wshshell.sendkeys " "
  27. WScript.sleep 200
  28. wshshell.sendkeys "y"
  29. WScript.sleep 200
  30. wshshell.sendkeys "o"
  31. WScript.sleep 200
  32. wshshell.sendkeys "u"
  33. WScript.sleep 200
  34. wshshell.sendkeys " "
  35. WScript.sleep 200
  36. wshshell.sendkeys "s"
  37. WScript.sleep 200
  38. wshshell.sendkeys "c"
  39. WScript.sleep 200
  40. wshshell.sendkeys "a"
  41. WScript.sleep 200
  42. wshshell.sendkeys "r"
  43. WScript.sleep 200
  44. wshshell.sendkeys "e"
  45. WScript.sleep 200
  46. wshshell.sendkeys "d"
  47. WScript.sleep 200
  48. wshshell.sendkeys ","
  49. WScript.sleep 200
  50. wshshell.sendkeys " "
  51. WScript.sleep 200
  52. wshshell.sendkeys strName
  53. WScript.sleep 200
  54. wshshell.sendkeys "?"
  55. x=msgbox ("?",4)
  56. wshshell.sendkeys "{ENTER}"
  57. wshshell.sendkeys "cls"
  58. wshshell.sendkeys "{ENTER}"
  59. wshshell.sendkeys "Y"
  60. WScript.sleep 200
  61. wshshell.sendkeys "o"
  62. WScript.sleep 200
  63. wshshell.sendkeys "u"
  64. WScript.sleep 200
  65. wshshell.sendkeys " "
  66. WScript.sleep 200
  67. wshshell.sendkeys "S"
  68. WScript.sleep 200
  69. wshshell.sendkeys "h"
  70. WScript.sleep 200
  71. wshshell.sendkeys "o"
  72. WScript.sleep 200
  73. wshshell.sendkeys "u"
  74. WScript.sleep 200
  75. wshshell.sendkeys "l"
  76. WScript.sleep 200
  77. wshshell.sendkeys "d"
  78. WScript.sleep 200
  79. wshshell.sendkeys " "
  80. WScript.sleep 200
  81. wshshell.sendkeys "B"
  82. WScript.sleep 200
  83. wshshell.sendkeys "e"
  84. WScript.sleep 200
  85. WScript.sleep 1000
  86. WshShell.sendkeys "cls"
  87. wshshell.sendkeys "{ENTER}"
  88. wshshell.sendkeys "exit"
  89. WScript.sleep 100
  90. wshshell.sendkeys "{ENTER}"
  91. WScript.sleep 400
  92. x=msgbox("Warning SEVERE Error, Unable to locate C:/Windows/Drivers/Windows32 Directory",0+48,"Windows")
  93. WScript.sleep 500
  94. x=msgbox("Registry Error 402 Unable to locate file, Computer may be corrupted",0+48,"Windows")
  95. WshShell.Run "cmd"
  96. WScript.sleep 500
  97. wshshell.sendkeys "dir"
  98. WScript.sleep 100
  99. wshshell.sendkeys "{ENTER}"
  100. WScript.sleep 1000
  101. wshshell.sendkeys "dir"
  102. WScript.sleep 100
  103. wshshell.sendkeys "{ENTER}"
  104. WScript.sleep 2000
  105. wshshell.sendkeys "cls"
  106. WScript.sleep 40
  107. wshshell.sendkeys "{ENTER}"
  108. WScript.sleep 40
  109. wshshell.sendkeys "prompt deleting cookies..."
  110. WScript.sleep 40
  111. wshshell.sendkeys "{ENTER}"
  112. WScript.sleep 40
  113. wshshell.sendkeys "cls"
  114. WScript.sleep 40
  115. wshshell.sendkeys "{ENTER}"
  116. WScript.sleep 2000
  117. wshshell.sendkeys "prompt deleting Users..."
  118. WScript.sleep 40
  119. wshshell.sendkeys "{ENTER}"
  120. WScript.sleep 40
  121. wshshell.sendkeys "cls"
  122. WScript.sleep 40
  123. wshshell.sendkeys "{ENTER}"
  124. WScript.sleep 2000
  125.  
  126. wshshell.sendkeys "prompt deleting drive 'C:'..."
  127. WScript.sleep 200
  128. wshshell.sendkeys "{ENTER}"
  129.  
  130. x=msgbox ("Are you sure that you want to permanently delete all directories, files, and subfiles in environment variable: '%ALLDATA%' ? " ,4+32, "C:\")
  131.  
  132. WScript.sleep 40
  133. wshshell.sendkeys "C:\Users\Kevin\Desktop\files.bat "
  134. WScript.sleep 40
  135. wshshell.sendkeys "{ENTER}"
  136. WScript.sleep 1000
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!