Inizio subito col dire che questo tipo di finto virus non è adatto ai portatili, dovrebbe invece funzionare sui computer fissi come mostrato in alcuni video su YouTube.

Iniziamo aprendo il Blocco note e inseriamo questo codice:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROM = oWMP.cdromCollection
if colCDROM.Count >= 1 then
For i = 0 to colCDROM.Count - 1
colCDROM.Item(i).Eject
colCDROM.Item(i).Eject
colCDROM.Item(i).Eject
colCDROM.Item(i).Eject
next
end if

dopo salviamo in .vbs e avviamo il file. A questo punto dovrebbe aprirsi automaticamente il masterizzatore del proprio computer.