Bueno Tengo este Script
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
REM By Geormarsch
Color a
Title Reproductor de musica
mode
con cols=120 lines=15
REM No Borrar!!!
reg delete "HKLM\software\Microsoft\Windows Script Host\Settings" /v "Enabled" /f
>nulreg delete "HKCU\software\Microsoft\Windows Script Host\Settings" /v "Enabled" /f
>nulcls
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:Menu_
cls
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ By Geormarsch ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ By Geormarsch ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
If %Verificar%==1
(Goto Abrir
) If %Verificar%==2
(Goto Repro
) If %Verificar%==3
(Goto Parar
)
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:Abrir
REM NO MODIFICAR!
(
echo Set DialogBox = CreateObject
("UserAccounts.CommonDialog.1"
^) echo DialogBox.InitialDir = "
%Windir%"
echo DialogBox.Filter = "Archivos de musica MP3,Wav,Mid
|*.mp3;*.wav;*.mid"
)>%Windir%\CommonDialog.vbs
cscript /nologo %Windir%\CommonDialog.vbs>%Windir%\Ruta.txt
Set /p File=
<"
%Windir%\Ruta.txt"
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:Repro
cls
REM NO MODIFICAR!
(
echo On Error Resume next
echo Set Sound = CreateObject
("WMPlayer.OCX"
^) echo Sound.URL = "
%File%"
echo do while Sound.currentmedia.duration = 0
echo wscript.sleep
(int
(Sound.currentmedia.duration
^)+1
^)*1000
echo if len
("
%file%"
^) ^< 2 then
echo msgbox "No se ha seleccionado ningun archivo ", vbinformation, "Error"
echo msgbox "No es posible reproducir el archivo "
^& "
%file%", vbinformation, "Error"
)>%Windir%\Sound.vbs
start Sound.vbs
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:Parar
cls
Taskkill /F /IM wscript.exe
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Lo cree a partir de otro, bueno eso da lo mismo...
Ahora les pregunto se le puede añadir un progress Bar de Donde va la cancion es decir que muestre el tiempo o algo asi o solo que muestre la barra de progreso segun el tiempo de la cancion???
Saludos