![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEid1varjXaMhY8x6J5TV4t9XVs8az6DfMp6uCJdNwlAlHUvxAn2C6NRPjai-atCUaAl6BCnUH5_8-4soGfX_sCBu607z7UVUoD4vi-mlVrW3ddOfABLZilz3QgJ6ieqfYTnwkTNUEsCxjDF/s320/clean_cd_rom.jpg)
The first code we are going to look at is one that makes the cd tray open and close repeatedly until shutdown, or
(you press ctrl + alt + delete and go to processes, and end wscript.exe (this code is vbs so save in note pad as whateveryouwant.vbs)
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
ZEESHAN HACKER ....
0 comments:
Post a Comment