ساخت ویروس cd rom

به نام خدا

سلام

امروز اومیدم با یه پست جدید ولی یجورایی خطرناک

خب ما این جلسه میخوایم یک ویروس ساده بسازیم برای شوخی

اگر میخواید ببینید چجوری؟ بامن همراه باش....

خب ما به یه فایل note pad نیاز داریم

خیلی ساده..

حالا توش مینویسیم:

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 8000

loop

حالا الان که توی نوتپد نوشتیدش حالا ببندید و با فرمت .vbs زخیره کنید

این ویروس وقتی اجرا بشه هر هشت ثانیه یک بار سی دی رام رو باز میکنه

شما میتونید تغییرش بدید مثلا بکنیدش ۵۰۰۰ یا ۳۰۰۰ البته توی خط یکی مونده به اخری

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

امیدوارم خوشتون اومده باشه از ویدیو

اگر خوشتون اومد حتما لایک و کامنت بزارید

تا جلسه ی خطری دیگه خدانگهدار...