How To Create Virus with Notepad-Continuously eject CD/DVD drives

Create HARMLESS & FUNNY virus ( not virus actually) that ejects all connected optical drives in computer, and eject back when reinserted as many time you insert back. This is for Fun with friends or maybe in School or college.

Copy the below code and paste in a blank new notepad file and save it with eject.vbs or an name ending in .vbs

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop

Also Read:

• Vulnhub Koptrix 1 Writeup [OSCP Like machines]
• TryHackMe – Network Services Walkthrough
• Cross-Site Scripting (XSS) – The Basics
• Bash for Hackers
• Basic Network Concepts for Hacking