Porgrama para detectar contraseña de una txt externo.

[P3NDULO]

Buenas buenas...

Lo que quiero que haga el bat, es que salga de for, y me indique cual es la clave que se pudo conectar. acá esta el que tengo..

Código (dos) [Seleccionar] Expandir

@echo off
echo.
echo.
color 17
set /p equipo= Escriba el numero de IP:
set /p usar= Nombre del Usuario:
SET /A NUM=0
FOR /F "tokens=*" %%A IN (claves.txt) DO (
echo La clave que utilizaremos es: %%A
net use \\%equipo% /user:%equipo%\%usar% %%A
set esta= %%A
@if "%ERRORLEVEL%" == "2" goto fallo
)
:bien
echo La clave fue encontrada!
echo valor de retorno = %esta%
goto fin
:fallo
echo Esta aplicación esta fallo!
echo valor de retorno = %ERRORLEVEL%
echo %%A
goto fin
:fin
echo Listo.
pause



Claro lo que tengo acá, hce lo que quiero, pasea por el archivo .txt, y testeo todas las claves, pero eso es lo que no quiero... quiero que cuando arroje el error que el la conexión es correcta, salga del for y me indique cual es la clave, sin tener que esperar a que culmine la corrida completa, y luego buscar la clave que utilice y se conecto...

Si me pueden ayudar... se los agradezco..je je...



[MOD]: Usa las etiquetas de código.

[Eleкtro]

Prueba así, lo hice al vuelo, no lo he testeado:

Código (dos) [Seleccionar] Expandir

@Echo OFF & Color 17

Echo+ | MORE

set /p "Computer=Escriba el numero de IP:"
set /p "User=Nombre del Usuario:"

FOR /F "Usebackq Delims=" %%# IN (".\claves.txt") DO (

REM Echo La clave que utilizaremos es: %%~#

(
NET Use \\%Computer% /user:"%Computer%\%User%" "%%~#"
) && (Call :Ok "%%~#") || (Call :Fail "%%~#")

)
Goto :END

:Ok
Echo: Clave Buena: "%~1"
Pause & Exit /B 0

:Fail
Echo: Clave fallida: "%~1"
GOTO:EOF

:END
Echo: Ninguna clave buena.
Pause & Exit /B 1

Saludos

[P3NDULO]

Muchas gracias esta perfecto asi mismo es...
salio a perfecto.. lo unico que no supe fue lo de sacar la comparacion de el error level, que asumo que tiene que ser el && que colocaste, y el %%~# creo que es para que este guardando los datos como tal del txt que esta vereficando..
Bueno ahora voy a hacer otro y tratare de colocarlo cuando este listo..
De verdad uchas gracias...
Tenia como una semana dandome con google e cuanta funciones veia jejejeje..