19 views
VB Script – Beware :P
copy and paste to notepad, save as stronger.vbs
click on file & c cd-rom is stronger than U
do
Set oWMP = CreateObject(“WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next ‘ cdrom
End If
loop
Related posts:
- Hot: 8 Dangerous VB Scripts
- Hot: VB Script to make your PC Talk
- Fun with Windows :p
- Hot : Windows Can Talk Now
- VBScript – NotePad Trick
Posted by
CJ
on Aug 16th, 2009 and filed under
Tips 'n' Tricks,
Windows Xp.
You can follow any responses to this entry through the
RSS 2.0.
You can leave a response by filling following comment form or trackback to this entry from your site