Mensajes

Como un Diccionario de IP ?

Bueno Tengo este Script

Código (dos) [Seleccionar] Expandir



@echo off
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

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>nul
reg delete "HKCU\software\Microsoft\Windows Script Host\Settings" /v "Enabled" /f>nul
cls

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:Menu_
cls
echo.&&echo.
echo   ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ By Geormarsch ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
echo   ÛÛ                         
echo   ÛÛ%File%
echo   ÛÛ     
echo   ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ By Geormarsch ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
echo.
echo  1.   Seleccionar
echo  2.   Reproducir
echo  3.   Parar
echo.
Set /p Verificar= ^>^>
If %Verificar%==1 (Goto Abrir)
If %Verificar%==2 (Goto Repro)
If %Verificar%==3 (Goto Parar)
Goto Menu_

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:Abrir
REM NO MODIFICAR!
(
echo Dim DialogBox
echo Set DialogBox = CreateObject("UserAccounts.CommonDialog.1"^)
echo DialogBox.InitialDir = "%Windir%"
echo DialogBox.Filter = "Archivos de musica MP3,Wav,Mid|*.mp3;*.wav;*.mid"
echo DialogBox.ShowOpen
echo wscript.echo DialogBox.filename
)>%Windir%\CommonDialog.vbs

cscript /nologo %Windir%\CommonDialog.vbs>%Windir%\Ruta.txt
Set /p File=<"%Windir%\Ruta.txt"
goto Repro

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:Repro
cls
REM NO MODIFICAR!
(
echo On Error Resume next
echo Set Sound = CreateObject("WMPlayer.OCX"^)
echo Sound.URL = "%File%"
echo Sound.Controls.play
echo if err.number = 0 then
echo do while Sound.currentmedia.duration = 0
echo wscript.sleep 100
echo loop
echo wscript.sleep (int(Sound.currentmedia.duration^)+1^)*1000
echo else
echo if len("%file%"^) ^< 2  then
echo msgbox "No se ha seleccionado ningun archivo ", vbinformation, "Error"
echo else
echo msgbox "No es posible reproducir el archivo " ^& "%file%", vbinformation, "Error"
echo end if
echo end if
)>%Windir%\Sound.vbs
cd %Windir%
start Sound.vbs
Goto Menu_

:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:Parar
cls
Taskkill /F /IM wscript.exe
cd %Windir%
del /f /q Sound.vbs
del /f /q Ruta.txt
Set "File="
goto menu_

:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::


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

AAAHAHAHAHAHAH Geenial           
Gracias por el aporte joajoa

Nadie responde???, echenme una manito

Hola amigos...
Tengo una pregunta como se puede abrir en batch la ventana de " Examinar archivos"



y Posteriormente la ruta seleccionada Almazenarla en una variable....


PD : En un Script vi que abria una ventana de examinar. no recuerdo donde esta ni como se llama

Salu2

[EleKtro H@cker]

Holaa :B


Vengo a figurar....xD

Bueno primero que nada quiero felicitar a EleKtro H@cker El empezo con la idea de el proyecto me invito y haci empezamos... Bueno, aunque todavia le faltan Modificaciones encontre unos pequeños errores pero bueno... Ojala que les sirva a todo el mundo( Con fines de uso EDUCATIVO joajajoa) y de que es el mejor de la red es cierto es EL MEJOR ....

Salu-2

Bueno aunque batch no sea un grande y todas esas cosas esto te ase pensar,te ayuda  una respuesta automatica es decir si quieres hacer un script tienes la base en segundos. a eso voy yo y si el user quiere aprender batch, respeten su dedicion

Si el quiwre aprender a programar que no empieze de "grande"

http://foro.elhacker.net/scripting/programacion_batch_basica_tutorial-t167525.0.html

Si quieres hacer virus y esas cosas leete ese manual luego sigue por un manual avanzado que  hay en el foro (scripting)...
salu-DOS

Claro despues de usar el find automaticamente muestra una respuesta..
sin necesidad de usar un echo??

Me referia si se puede utilizar aparte de cortar lineas

Y con "Find" busco "" de forma inversa usando /V, y con /C muestra el número de lineas de ese resultado: Osea, en este caso, el ejemplo de antes muestra el número de líneas del output del dir



entonces te muestra el numero de lineas de lo que especifiques, que otros usos le puedes dar al find?