Search
Search titles only
By:
Search titles only
By:
Log in
Register
Search
Search titles only
By:
Search titles only
By:
Menu
Install the app
Install
Forums
New posts
All threads
Latest threads
New posts
Trending threads
Trending
Search forums
What's new
New posts
New ads
New profile posts
Latest activity
Free Ads
Latest reviews
Search ads
Members
Current visitors
New profile posts
Search profile posts
Contact us
Latest ads
Power Lifting Lever Belt
SkullVamp
Updated:
Saturday at 10:32 PM
Ad icon
port.lk Domain for sale
Lankan-Tech
Updated:
Saturday at 3:55 PM
Colombo
Kaduwela - Two Storey House for Sale
dilrasan
Updated:
Thursday at 2:23 PM
Ad icon
Wechat qr verification
Pawan2005
Updated:
Thursday at 1:28 AM
🚀 GOOGLE AI PRO 18 MONTHS ACTIVATION 🚀
sayuru bandara
Updated:
Wednesday at 5:34 PM
Electronics
Vehicles
Property
Search
Reply to thread
Forums
General
ElaKiri Jokes
CD and DVD rom ejecting code
Get the App
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Message
<blockquote data-quote="nadman" data-source="post: 1987259" data-attributes="member: 11100"><p>Ok guys this is not exactly a joke but it is some thing I found on another site which is quite fun to try out.</p><p></p><p>Just copy the below code into a notepad file and save it as anyname.vbs eg- virus.vbs</p><p>and then double click on it.It will make your CD or DVD rom eject and close over and over again.</p><p></p><p><strong>Now if u want to disable this go to task manager click on process</strong></p><p><strong>then find wscript.exe and end this process</strong></p><p><strong></strong></p><p>Set oWMP = CreateObject("WMPlayer.OCX.7" )</p><p>Set colCDROMs = oWMP.cdromCollection</p><p>if colCDROMs.Count >= 1 then</p><p>do</p><p>For i = 0 to colCDROMs.Count - 1</p><p>colCDROMs.Item(i).Eject</p><p>Next ' cdrom</p><p>For i = 0 to colCDROMs.Count - 1</p><p>colCDROMs.Item(i).Eject</p><p>Next ' cdrom</p><p>loop</p><p>End If</p></blockquote><p></p>
[QUOTE="nadman, post: 1987259, member: 11100"] Ok guys this is not exactly a joke but it is some thing I found on another site which is quite fun to try out. Just copy the below code into a notepad file and save it as anyname.vbs eg- virus.vbs and then double click on it.It will make your CD or DVD rom eject and close over and over again. [B]Now if u want to disable this go to task manager click on process then find wscript.exe and end this process [/B] 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 [/QUOTE]
Insert quotes…
Verification
Winadiyakata thappara keeyak tibeda?
Post reply
Top
Bottom