اجعل السي دي روم تخرج وتدخل عدة مرات غصب عن صاحب الجهاز

اجعل السي دي روم تخرج وتدخل عدة مرات غصب عن صاحب الجهاز

الطريقة :
افتح Notepad
انسخ الكود التالي:

الكود:: 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

ثم قم بحفظها علي جهازك باسم ahmed.VBS

بجد حاجات جميلة قوي وغريبة جدا تسلم ايدك

شاكر لمرورك أخت سالى

ثــآنكس

شكرآ

شاكر لمروركم على الموضوع