Truco: abrir el reproductor de CD con un codigo

primero abran "notepad" y ponfan el codigo de abajo y lo salvan como .vbs por ejemplo asi:

 

truco.vbs

 

este es el codigo:

 

 

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 100
loop




 

Encuesta
 
Afilados
 
Quieres que publique tu myspace, website o foro? contacteme!
---------------------------------------------------

The Legend Hack


www.trucosbuenisimos.tk - Hacking

The Drunks

Geek-Team

MCYOM

www.myspace.com/robdubmaniaks

Versos y canciones By Itzel
Er Design

Contador de visitas
 
eXTReMe Tracker
 
Este sitio web fue creado de forma gratuita con PaginaWebGratis.es. ¿Quieres también tu sitio web propio?
Registrarse gratis