[Batch] Como puedo validar la variable? [Solucionado]

Iniciado por Batitoul, 24 Agosto 2011, 20:58 PM

0 Miembros y 1 Visitante están viendo este tema.

Batitoul

Ante todo buenas tardes:
Bueno, en mi trabajo usamos este comando para forzar la expiracion de las cintas en el NetBackup.-
              bpexpdate -m "0662L1" -d 0

Bueno cree la siguiente BAt para automatizarlo.
]@echo Off
color 1A
c:
cls
cd\
cd "C:\Program Files\Veritas\NetBackup\bin\admincmd"
echo Escribe el numero de tape.
echo.
set /p var=
echo.
bpexpdate -m "%var%" -d 0
Echo ¡¡ Felicidades, acabas de forzar la expiracion de la cinta !!
Echo.
pause > nul[td
Aquí viene la duda:
Como hago para que al escribir la variable %var% solo  permita el ingreso de 6 caracteres, ni un caracter mas ni un caracter menos; solo debe permitir ingresar 6 caracteres alfanuméricos ???

agradezco de antemano sus respuestas.


GroK

Hola,

Yo haría ese mismo script pero bajo un lenguaje que permitiera el uso de expresiones regulares, como Python o Ruby. Una expresión regular que te serviría sería una sencilla como esta:


/^\w{6}$/


De modo que matchea 6 y solamente 6 caracteres alfanuméricos (e incluyendo el símbolo de underscore "_". Si es fundamental que ese tampoco esté, pues te creas una clase de caracteres tal que así: [a-zA-Z0-9] y la pones donde estaba \w)

Otra opción es hacer la validación de la cadena llamando al intérprete desde el mismo script bat que ya tienes, y que te devuelva algún valor que luego puedas comprobar en el bat para saber si la cadena introducida es válida o no.

Saludos
"I put on my Hendrix album and my son said 'Dad, who's that?' and i said 'Well son, that's God' "- Robert Plant


leogtz

#2
Podrías hacer algo así

Código (dos) [Seleccionar]
@echo off
:menu
set /p "var=:";
if not defined var goto:menu
echo %var% | findstr /r "......$" > nul 2>&1 && (
echo Correcto, 6
rem Demàs còdigo...
) || (goto:menu)
Código (perl) [Seleccionar]

(( 1 / 0 )) &> /dev/null || {
echo -e "stderrrrrrrrrrrrrrrrrrr";
}

http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com

aNT366

#3
 
OJO...
En w7 esto no funciona: "......$"  ...Esto si...  "^.......$"

leogtz

Cita de: aNT366 en  4 Septiembre 2011, 06:37 AM

OJO...
En w7 esto no funciona: "......$"  ...Esto si...  "^.......$"

Lo probé en Windows 7 y funciona.
Código (perl) [Seleccionar]

(( 1 / 0 )) &> /dev/null || {
echo -e "stderrrrrrrrrrrrrrrrrrr";
}

http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com

Batitoul

Estimados, se pasaron esa ultima respuesta fue la solucion, como un silmple caracter puede hacer ladiferencia.

Este foro si que es de mucha ayuda para nosotros que recien nos iniciamos en esta locura de programar.

;-)

aNT366

#6
Ahora que lo veo el fallo real del script está en basarlo un poco en trucos de la programación o caracteres que como vemos no funcionan en todas la máquinas.

Es infinitamente mejor la lógica. Esto no puede fallar:

@ECHO OFF
:BUCLE
CLS & ECHO.
SET /p "PASS=INTRODUCE SOLO SEIS CARACTERES:";

SET SW=#%PASS%
SET SW=%SW:~-6%

IF "%SW%" NEQ "%PASS%" GOTO:BUCLE

ECHO. & ECHO  SW:[%SW%]  PASS: [%PASS%] & PAUSE



Modificado que me faltaban unas comillas...

leogtz

Cita de: aNT366 en 11 Septiembre 2011, 19:46 PM
Ahora que lo veo el fallo real del script está en basarlo un poco en trucos de la programación o caracteres que como vemos no funcionan en todas la máquinas.

Es infinitamente mejor la lógica. Esto no puede fallar:

@ECHO OFF
:BUCLE
CLS & ECHO.
SET /p "PASS=INTRODUCE SOLO SEIS CARACTERES:";

SET SW=######%PASS%
SET SW=%SW:~-6%

IF %SW% NEQ %PASS% GOTO:BUCLE

ECHO. & ECHO  SW:[%SW%]  PASS: [%PASS%] & PAUSE

) || (GOTO:BUCLE)



REM SET SW=%PASS:~0,-6%


A ver, las expresiones regulares no son "trucos de programación", si así lo quieres ver es tu problema, y funcionan en donde sea, están totalmente probadas y funcionan, y no hay que recurrir a una solución artesanal, es mejor usar una expresión regular para este caso:

C:\Windows\system32>echo hola12 | findstr /r /b ^.......$ && echo ok || echo mal
hola12
ok

C:\Windows\system32>echo hola123 | findstr /r /b ^.......$ && echo ok || echo mal
mal

C:\Windows\system32>echo 123456 | findstr /r /b ^.......$ && echo ok || echo mal
123456
ok

C:\Windows\system32>echo 12345 | findstr /r /b ^.......$ && echo ok || echo mal
mal

C:\Windows\system32>echo lalalax | findstr /r /b ^.......$ && echo ok || echo mal
mal

C:\Windows\system32>echo lalala | findstr /r /b ^.......$ && echo ok || echo mal
lalala
ok

C:\Windows\system32>



A ver, dime, ¿qué problema hay con la lógica ahí?
Código (perl) [Seleccionar]

(( 1 / 0 )) &> /dev/null || {
echo -e "stderrrrrrrrrrrrrrrrrrr";
}

http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com

aNT366

Amos a ver Leo que no era mi intención  molestar.
Esa solución artesanal es la lógica ( me refiero a la última posteada)

Te daría la razón en lo que dices si realmente tu solución funcionase en cualquier máquina.

Por cierto lo probe en mi xp, otro xp virtualizado, otra máquina con w7...y no funciona en ninguna. Debe ser algo de configuración del teclado, creo yo.

Si por solución artesanal te refieres a lo de "^...." decirte que lo he visto en más de uno de tus scripts.  ( y a mí me funciona ), aunque la última solución posteada  por mí es la que no va a fallar en ningún PC.  ); 

¿ Si no le llamamos truco y no funciona en todos los pcs  como le llamarias ?

Y reiterar que para nada es mi inteción molestar ehhh. Un saludo.


leogtz

Cita de: aNT366 en 11 Septiembre 2011, 21:32 PM

¿ Si no le llamamos truco y no funciona en todos los pcs  como le llamarias ?


Es que debe funcionar en todas las computadoras, porque el patrón es universal, es más, la expresión regular, , funcionaría tanto en Linux, con Perl, con lo que sea...

Código (bash) [Seleccionar]
echo -e "hola12" | grep -E "^......$"

Quizá mi solución no funcionó porque me faltó el ^ y no la probé ...
Código (perl) [Seleccionar]

(( 1 / 0 )) &> /dev/null || {
echo -e "stderrrrrrrrrrrrrrrrrrr";
}

http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com