Harmless funny Virus - Notepad Trick

This VBS trick continuously eject your CD/DVD drive automatically, every time you put it back.

• Open Notepad
• Copy the below code in notepad.
  
  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 5000loop
• Save the file with any name and .vbs extension rather than .txt .
• Open the file by double clicking on it and Enjoy !!!!
• Remember that some antivirus block this script, so please add it to your wish list or turn off your antivirus before executing it.

Bhuvan Arora