CD/DVD läsaren åker in åk ut

Med hjälp av det här scriptet, kan man göra så att CD/DVD läsaren öppnas och stängs tills man stänger av det.

Öppna anteckningar/notepad och skriv in detta:

MsgBox "ditt medelande",64,"Din rubrik"
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For a = 0 to 100
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
Next ' a
End If

Spara det som .vbs

Man stänger av detta programet på ett mycket enkelt sätt: Klicka upp aktivitetshanteraren, klicka sedan på Processer. Leta upp wscript.exe och avsluta processen. Nu ska CD/DVD läsaren förbli stängd.