Hacking Tricks- Continously eject cd/dvd drives using notepad trick

CONTINOUSLY EJECT CD/DVD DRIVES USING NOTEPAD TRICK

      •    Open notepad
      •    Copy and paste following 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 5000
                  loop

        •    Save the file with .vbs extension eg. fun.vbs
        •    Open the saved file and see the magic.

Find latest hacking tricks , Windows tricks, internet tricks, Android Tricks, notepad tricks, Mobile Tricks, Recharge Tricks etc increase your knowledge with latest technology http://www.facebook.com/hackmoves