- HACK.ME
Trending
Tuesday, June 4, 2013

Optical Drive Door Virus

Open the notepad type the following coding

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set oCD = oWMP.cdromCollection.getByDriveSpecifier("J:") ' or whatever
If vbOK = MsgBox ("Eject?", vbOKCancel) Then
oCD.Eject
If vbOK = MsgBox ("Close?", vbOKCancel) Then
oCD.Eject
End if
End if

And save it in to filename.vbs
Reviewed by Vipula Dissanayake on 5:29:00 AM Rating: 5 Optical Drive Door Virus Open the notepad type the following coding Set oWMP = CreateObject("WMPlayer.OCX.7") Set oCD = oWMP...

No comments: