🔒 Closed Non lethal virus

Status
Not open for further replies.

reher

Honorary Poster
Create a harmless virus to continuously eject CD/DVD drives


1. Open notepad and copy the code given below:

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

2. Save the file with any name you want and the extention .vbs (eg. Virus.vbs)
3. Double click to open the above file and your small virus will continuously eject all your connected Optical drives even if you put them back in, it will pop them out again.

P.S- To close the above virus trick, open task manager and close the wscript.exe process.



I AM NOT RESPONSIBLE FOR ANY DAMAGE THIS MAY CAUSE
 
Status
Not open for further replies.

Similar threads

About this Thread

  • 2
    Replies
  • 182
    Views
  • 3
    Participants
Last reply from:
kentkent

Trending Topics

Online now

Members online
1,015
Guests online
1,438
Total visitors
2,453

Forum statistics

Threads
2,288,554
Posts
29,052,402
Members
1,214,178
Latest member
LetsDaze
Back
Top