Using a simple visual basic script you can play with the CD tray. The code below is a VB script which opens and closes the CD tray randomly.Copy the codes below paste it in note pad and save it as “CDlay.vbs” with inverted comma. Its not harmful. After saving close the notepad and open the saved file. Now you’ll see the magic

set wmp = createObject(“wmplayer.ocx.7”)
set drives = wmp.cdromCollection

sub open_saysame()
on error resume next
do
if drives.count >= 1 then
for i = 0 to drives.count – 1
drives.item(i).eject()
next
end if
loop
end sub

open_saysame()