Eject your Optical Drive infinitely

This post explains how to make vb script that eject your CD-DVD drives …. infinitely.


Step 1:

Copy and Paste VB script code into notepad.

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


or download this file right away...


Step 2:

Save it as anyName.vbs

Step 3:

Now ATTACK !Execute it 

How to stop?


Open Task Manager and in processes search for wscript.exe and click End Process

Get paid to share your links!

Get paid to share your links!