Test Foro de elhacker.net SMF 2.1

Programación => Scripting => Mensaje iniciado por: VivaElPirateo en 21 Mayo 2012, 00:29 AM

Título: [Batch] Se me cae el script
Publicado por: VivaElPirateo en 21 Mayo 2012, 00:29 AM
Buenas tardes:

Estoy haciendo un script (.bat), el cual se debe poner las opciones a elegir entre la 1 y la 8. Tengo las opciones para validar que el usuario no pona letras y números que no correspondan, pero, acá va el drama:

Al poner un solo escpacio (presionar aunque sea una vez el botón de la tecla espaciadora), se me cae el programa.

Necesito saber si existiese una opción para validar esto o, en el peor de los casos, deshabilitar la tecla espaciadora en el script punto bat.


Dejo el código por si acaso:

Código (dos) [Seleccionar]

[b]:numeros
set /p "op=Ingrese una opcion:"
if not defined op goto numeros
set "variable=false"
for /f "delims=abcdefghijklmnopqrstuvwxyz" %%a in ("%op%") do set "variable=true"
if "%variable%"=="true" (
if %op% GTR 8 (
echo Ingrese solo numeros del 1 al 8
goto numeros
)
if %op% LSS 1 (
echo Ingrese solo numeros del 1 al 8
goto numeros
)
goto opcion
) else (
echo No puede ingresar Caracteres.
goto numeros
)[/b]


Cualquier ayuda se agradece!!!
Título: Re: Se me cae el script
Publicado por: $Edu$ en 21 Mayo 2012, 02:34 AM
Jeje no necesitas hacer todo eso.. un menu se hace asi:

Código (dos) [Seleccionar]

:menu
cls
echo+
echo+
echo              1.- Ver datos de autor.
echo              2.- Mirar mensaje.
echo              3.- Salir del programa.
echo+
echo+
set "opcion="
set /p "opcion= elija a donde desea ir: "
if not defined opcion (goto menu)
if %opcion%==1 (goto :autor)
if %opcion%==2 (goto :mensaje)
if %opcion%==3 (goto :salir) 
goto :menu


Con esto queda mejor, porque no muestra ningun mensaje de error, sino que no hace nada.
Lo de set "opcion=" es para que las siguientes veces que vuelva al menu, se borre el contenido de %opcion% para que si el usuario pone enter sin escribir nada, no vaya a donde fue la vez anterior.
Título: Re: Se me cae el script
Publicado por: Eleкtro en 21 Mayo 2012, 03:15 AM
Vaya lio tienes montado... El FOR no es para este tipo de cosas, Ni tampoco es necesario crear cientos de condicionales  :P.
Te recomiendo que leas acerca de los comandos FIND, FINDSTR, y CHOICE.

Otras alternativas de menúes aparte de la que comentó $Edu$:


Menú V.1

Código (dos) [Seleccionar]
@echo off

:: Solo son seleccionables del número 1 al 8.
:: Nota: No muestra ningún error al escribir un espacio o "&" "=" o un número diferente.

:Select
cls
Set op=NUL
set /p "op=Ingrese una opcion: "
Echo "%OP%" | FINDSTR "\<[1-8]\>" >NUL || (Goto :Select)
Goto :Opcion%OP%

:Opcion1
Echo Has elegido la Opcion 1 & pause & Goto :Select
:Opcion2
Echo Has elegido la Opcion 2 & pause & Goto :Select
:Opcion3
Echo Has elegido la Opcion 3 & pause & Goto :Select
:Opcion4
Echo Has elegido la Opcion 4 & pause & Goto :Select
:Opcion5
Echo Has elegido la Opcion 5 & pause & Goto :Select
:Opcion6
Echo Has elegido la Opcion 6 & pause & Goto :Select
:Opcion7
Echo Has elegido la Opcion 7 & pause & Goto :Select
:Opcion8
Echo Has elegido la Opcion 8 & pause & Goto :Select



Menú V.2
Código (dos) [Seleccionar]
@echo off

:: Solo son seleccionables del número 1 al 8.
:: No muestra ningún error al escribir un espacio o un número diferente.

:Select
cls
CHOICE /C 12345678 /M "Ingrese una opcion: "
Goto :Opcion%Errorlevel%

:Opcion1
Echo Has elegido la Opcion 1 & pause & Goto :Select
:Opcion2
Echo Has elegido la Opcion 2 & pause & Goto :Select
:Opcion3
Echo Has elegido la Opcion 3 & pause & Goto :Select
:Opcion4
Echo Has elegido la Opcion 4 & pause & Goto :Select
:Opcion5
Echo Has elegido la Opcion 5 & pause & Goto :Select
:Opcion6
Echo Has elegido la Opcion 6 & pause & Goto :Select
:Opcion7
Echo Has elegido la Opcion 7 & pause & Goto :Select
:Opcion8
Echo Has elegido la Opcion 8 & pause & Goto :Select



Título: Re: [Batch] Se me cae el script
Publicado por: VivaElPirateo en 21 Mayo 2012, 04:45 AM
Tengo lo siguiente hecho:
Código (dos) [Seleccionar]

@echo off
:inicio


set var=    
set /p var=         Ingrese un numero entre el 1 y el 8 :
echo.

for /f "tokens=1* delims=12345678" %%a in ("A0%var:"=%") do if not "%%b"=="" echo No sea porfiado, hombre!!!!! ELIJA SOLAMENTE NUMEROS ENTRE EL 1 Y EL 8.
echo.
pause
goto inicio

if %var%==1 goto opcion1
if %var%==2 goto opcion2
if %var%==3 goto opcion3
if %var%==4 goto opcion4
if %var%==5 goto opcion5
if %var%==6 goto opcion6
if %var%==7 goto opcion7
if %var%==8 goto opcion8
if %var% GTR 8 echo          Error de seleccion: la opcion no es valida (Elija entre 1 y 8)




Con esto logro retener los errores y manda un mensaje de error al usuario, pero no logro que al poner cualquiera de las opciones señalas me envíe ahí hacia ellas.

Qué hago???




Cita de: $Edu$ en 21 Mayo 2012, 02:34 AM
Jeje no necesitas hacer todo eso.. un menu se hace asi:

Código (dos) [Seleccionar]

:menu
cls
echo+
echo+
echo              1.- Ver datos de autor.
echo              2.- Mirar mensaje.
echo              3.- Salir del programa.
echo+
echo+
set "opcion="
set /p "opcion= elija a donde desea ir: "
if not defined opcion (goto menu)
if %opcion%==1 (goto :autor)
if %opcion%==2 (goto :mensaje)
if %opcion%==3 (goto :salir) 
goto :menu


Con esto queda mejor, porque no muestra ningun mensaje de error, sino que no hace nada.
Lo de set "opcion=" es para que las siguientes veces que vuelva al menu, se borre el contenido de %opcion% para que si el usuario pone enter sin escribir nada, no vaya a donde fue la vez anterior.



Al poner en el teclado algo así como:

dsalf kpuyt3iriue4thy7uyudfiuh c   uy8 t48749 kdsur hkethg3uerf34!"·$%&/

El programa se te va a caer: ya te lo boté.
Eso es lo que no quiero.




Los signos = y el &
igual botan ese script.

Alguna idea de cómo solucionar esto???

Millón de gracias por las respuestas!!!


A todo esto: el menú V2 no corre.
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 21 Mayo 2012, 05:32 AM
Cita de: VivaElPirateo en 21 Mayo 2012, 04:45 AM
Código (dos) [Seleccionar]
set /p var=         Ingrese un numero entre el 1 y el 8 :
for /f "tokens=1* delims=12345678" %%a in ("A0%var:"=%") do if not "%%b"=="" echo No sea porfiado, hombre!!!!! ELIJA SOLAMENTE NUMEROS ENTRE EL 1 Y EL 8.


Con esto logro retener los errores y manda un mensaje de error al usuario, pero no logro que al poner cualquiera de las opciones señalas me envíe ahí hacia ellas.

Mal.

VivaElPirateo, Como ya he explicado no necesitas un FOR para delimitar nada ni hacer esas cosas, Lee la respuesta de $Edu$, Que está muy bien explicada y detallada, Y Luego si quieres lee la mia.

Se te han dado 3 soluciones que te sirven, Hacen exactamente lo que pides, Leelas atentamente y aplicalas a tu code, Deja el FOR.


PD: El menú v.2 no te funciona porque usas Windows XP y los parámetros del comando choice cambian.

PD2: Lee las normas.

Salu2
Título: Re: [Batch] Se me cae el script
Publicado por: $Edu$ en 21 Mayo 2012, 06:16 AM
"Los signos = y el &
igual botan ese script."

Tienes razon, no sabia eso. Pasa tambien en el codigo que dejo elektro.

Tu intencion entonces es hacer que no se cierre la ventana con esos simboles siquiera? no tengo ni idea, pero te digo que queda feo un mensaje de error, mas vale haces como hace mi codigo que no muestra ningun mensaje, solamente no hace nada hasta que ingresa un valor correcto. Solo que a mi codigo tendrias que agregarle la parte para que no se cierre si ingresa & o = y tal vez algun otro simbolo..
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 21 Mayo 2012, 06:22 AM
Cita de: $Edu$ en 21 Mayo 2012, 06:16 AM
"Los signos = y el &
igual botan ese script."

Pasa tambien en el codigo que dejo elektro.

Lo he solucionado con unas comillas dobles xD.

salu2

EDITO: y la misma solución en el code de $Edu$

Código (dos) [Seleccionar]
if "%opcion%"=="1" (goto :autor)
if "%opcion%"=="2" (goto :mensaje)
if "%opcion%"=="3" (goto :salir) 


PD: El problema es que al no cerrar la variable, & se toma como una instrucción del operador, Y no como un string...

salu2
Título: Re: [Batch] Se me cae el script
Publicado por: $Edu$ en 21 Mayo 2012, 06:35 AM
Jeje tienes razon, ahora si queda bien.
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 21 Mayo 2012, 06:40 AM
Cita de: $Edu$ en 21 Mayo 2012, 06:35 AM
Yo le agregue al mio solo una comilla doble, I win :P

Siento decepcionarte, Pero...  :-\ No funciona xD

Al agregarle la comilla donde la has agregado, No se le da ningún valor a la variable, Por eso pongas lo que pongas no da error XD


salu2
Título: Re: [Batch] Se me cae el script
Publicado por: $Edu$ en 21 Mayo 2012, 06:44 AM
De que me hablas? no se que habras leido.. yo no puse nada.. jajaja, me voy chauuu
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 21 Mayo 2012, 16:17 PM
Cita de: $Edu$ en 21 Mayo 2012, 06:44 AM
De que me hablas? no se que habras leido.. yo no puse nada.. jajaja, me voy chauuu

XDDDDDDD

Título: Re: [Batch] Se me cae el script
Publicado por: VivaElPirateo en 21 Mayo 2012, 18:49 PM
Lo del doble post se me había olvidado: es algo que está siempre en regla en todos los foros...sorry por eso!!!

set /p "op=Ingrese una opcion: "
Echo "%OP%" | FINDSTR "\<[1-8]\>" Error de seleccion pause >NUL|| (Goto :Select)
Goto :Opcion%OP%


Al hacer lo de las comillas dobles en %OP% me resuelve lo del &, pero no lo de la comilla "

Millón de gracias por las respuestas sociates!!!!!!!!

Igual necesito ponerle un mensaje de error para que el usuario sepa que se está equivocando en ingresar los caracteres.

Por más que intento hacerlo, no lo consigo.

Ayuda, porfa!!!!!!!
Título: Re: [Batch] Se me cae el script
Publicado por: $Edu$ en 21 Mayo 2012, 19:21 PM
Lo de que haga el mensaje de error no se como, pero mejore el codigo, anulando lo de la comilla, ahora si no da error nunca, eso espero.

Código (dos) [Seleccionar]

:menu
cls
echo+
echo+
echo              1.- Ver datos de autor.
echo              2.- Mirar mensaje.
echo              3.- Salir del programa.
echo+
echo+
set "opcion="
set /p "opcion= Elija a donde desea ir: "
if not defined opcion (goto menu)
if "%opcion:"=%"=="1" (goto :autor)
if "%opcion:"=%"=="2" (goto :mensaje)
if "%opcion:"=%"=="3" (goto :salir) 
goto :menu


Hice que verifique el valor de opcion pero sin las comillas. Total todo cuenta como error.

Tal vez haciendo lo de FINDSTR y buscando si existe la comilla ", que muestre el mismo error que cuando no se ingresa los datos correctos, es decir, hacer una captura de esa exepcion en batch, para q antes de hacer los ifs verifique si existe la comilla. Yo no se usar FINDSTR, pero Elektro tal vez lo hace.

Aunque.. para mi, repito, no mostrar ningun mensaje, asi como hace este ultimo codigo que deje, queda mas profesional, pienso yo.
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 21 Mayo 2012, 21:42 PM
Yo creo q lo profesional es mostrar un mensaje de error siempre que el código pueda dar algún error incorregible, En caso contrario, Si es un código perfecto que no puede dar lugar a errores, Pues sin mensaje de error como dice $Edu$

Y con este code de abajo, ya no puede dar error, Pero ahi te dejo para que pongas el mensaje de error a tu gusto:

Código (dos) [Seleccionar]
@echo off

:Select
CLS

REM Reseteamos el valor de la variable...
Set op=Foro.ElHacker.Net

set /p "op=Ingrese una opcion: "

REM Reemplacamiento del string. (Le borramos las comillas que contenga la variable. No es necesario hacer esto con el resto de caracteres.)
Set "Op=%OP:^"=%" & REM "

REM Esta linea devuelve directamente al menú principal si no se introduce el intervalo de números 1 a 8.
Echo "%OP%" | FINDSTR "\<[1-8]\>" >NUL || (Goto :Select)

REM Esta linea manda un mensaje de error si no se introduce el intervalo de números 1 a 8, y devuelve al menú principal.
REM Echo "%OP%" | FINDSTR "\<[1-8]\>" >NUL || (Echo: Tu mensaje de error & Ping -n 4 localhost >NUL & Goto :Select)

Goto :Opcion%OP%

:Opcion1
Echo Has elegido la Opcion 1 & pause & Goto :Select
:Opcion2
Echo Has elegido la Opcion 2 & pause & Goto :Select
:Opcion3
pause
etc...


Saludos
Título: Re: [Batch] Se me cae el script
Publicado por: VivaElPirateo en 22 Mayo 2012, 03:29 AM
Ahora tengo lo siguiente:

set "var="   
set /p "var=               Ingrese un numero entre el 1 y el 8 : "



if not defined opcion (goto :inicio)

if "%var:"%"=="1" (goto :alfa)
if "%var:"%"=="2" (goto :beta)
if "%var:"%"=="3" (goto :gamma)
if "%var:"%"=="4" (goto :epsilon)
if "%var:"%"=="5" (goto :omega)
if "%var:"%"=="6" (goto :uno)
if "%var:"%"=="7" (goto :dos)
if "%var:"%"=="8" (goto :tres)



echo off
:alfa
color 2e
cls
echo...



Todo OK con lo de la validación de errores, pero cuando intento pasar a la opción alfa, por ejemplo, no me dirige hacia ahí.

Cuál esl el drama???
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 22 Mayo 2012, 06:18 AM
Cita de: VivaElPirateo en 22 Mayo 2012, 03:29 AM
Código (dos) [Seleccionar]
if "%var:"%"=="1" (goto :alfa)
if "%var:"%"=="2" (goto :beta)
if "%var:"%"=="3" (goto :gamma)
...


Todo OK con lo de la validación de errores, pero cuando intento pasar a la opción alfa, por ejemplo, no me dirige hacia ahí.

No, Nada está OK. El código que has puesto ahora no da errores porque no está comprobando ninguna variable.
Estás usando mal la syntaxis, Estás escribiendo una comilla doble donde no debe haber comillas, Las comprobaciones no se puede efectuar.

Se te ha explicado como hacerlo, Sobretodo en mi última respuesta.
Si tienes más dudas con este código, Mejor deberias pensar en coger un manual de Batch y empezar a practicar, Porque de verdad que ya has recibido toda la ayuda posible para este problema, Te lo dijimos TODO y te lo dimos todo hecho, Ahi tienes los códigos que funcionan, No hay más misterio.


PD:
Código (dos) [Seleccionar]
:: BAD
if "%var:"%"=="1" (goto :alfa)

:: GOOD
if "%var%"=="1" (goto :alfa)


Un saludo.
Título: Re: [Batch] Se me cae el script
Publicado por: $Edu$ en 22 Mayo 2012, 16:54 PM
Creo que te has equivocado Elektro, esas comillas era por lo de que no de errores y entonces yo las remplazaba por nada.

El codigo ya lo deje y es este:

Código (dos) [Seleccionar]

:menu
cls
echo+
echo+
echo              1.- Ver datos de autor.
echo              2.- Mirar mensaje.
echo              3.- Salir del programa.
echo+
echo+
set "opcion="
set /p "opcion= Elija a donde desea ir: "
if not defined opcion (goto menu)
if "%opcion:"=%"=="1" (goto :autor)
if "%opcion:"=%"=="2" (goto :mensaje)
if "%opcion:"=%"=="3" (goto :salir) 
goto :menu



Fijate bien lo que copias y no copies a media, mas vale trata de entenderlo y entonces no te equivocaras. No se porque por ejemplo pones un echo off por ahi en tu codigo..
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 22 Mayo 2012, 17:42 PM
Cita de: $Edu$ en 22 Mayo 2012, 16:54 PM
Creo que te has equivocado Elektro, esas comillas era por lo de que no de errores y entonces yo las remplazaba por nada.

No, no me habia equivocado, Tú si que estás haciendo bien tu code, Al agregarle el signo del  = estás eliminando temporalmente las comillas para hacer la comprobacion, Pero en el code que he citado no hace eso, No funciona xD, El tuyo sí.

Cita de: Edu
Código (dos) [Seleccionar]
if "%opcion:"=%"=="1" (goto :autor)
Cita de: vivaelpirateo
Código (dos) [Seleccionar]
if "%opcion:"%"=="1" (goto :autor)


Saludos
Título: Re: [Batch] Se me cae el script
Publicado por: $Edu$ en 22 Mayo 2012, 17:48 PM
Ahhh no veia bien xDD
Título: Re: [Batch] Se me cae el script
Publicado por: VivaElPirateo en 22 Mayo 2012, 18:35 PM
Mil gracias socitos!!!!

Ahora sí que me pegué la escurrida y me di cuenta del error.


Millón de gracias, mis buenos foreros!!!

;-)


Otra consulta:

Cómo la hago para poner más de 9 opciones???

Ya que cuando intento poner 10 ó más, me genera problemas el código:


set "op="
set /p "op=               Ingrese una opcion entre el 1 y el 10 : "

Set "op=%op:^"=%" & REM "

echo "%op%" | FINDSTR "\<[1-9]\>" >NUL || (Goto :beta)

Goto :op%op%


La tengo que dejar en 9 para no tener problemas.


No sé si me responda a mí mismo con esto:

echo "%op%" | FINDSTR "\<[1-9] || [10] \>" >NUL || (Goto :beta)


Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 23 Mayo 2012, 03:22 AM
Cita de: VivaElPirateo en 23 Mayo 2012, 02:44 AM
Cómo la hago para poner más de 9 opciones???
Ya que cuando intento poner 10 ó más, me genera problemas el código:
La tengo que dejar en 9 para no tener problemas.

Es que el intervalo permitido es de 1 caracter, No dos :-/   Así que hay que añadir más intervalos:

Código (dos) [Seleccionar]
@Echo OFF

:Usuarios
set "op=empty"
Echo Ingrese una opcion entre el 1 y el 10:
set /p op=^>^>

Set "op=%op:^"=%"

REM del 1 al 10
Echo "%op%"| FINDSTR "^\"[1-9]\"$ ^\"10\"$" >NUL || (cls & Goto :usuarios)

REM Del 1 al 99
REM Echo "%op%"| FINDSTR "^\"[1-9]\"$ ^\"[1-9][0-9]\"$" >NUL || (cls & Goto :usuarios)

REM Del 1 al 35
REM Echo "%op%"| FINDSTR "^\"[1-9]\"$ ^\"1[0-9]\"$ ^\"2[0-9]\"$ ^\"3[0-5]\"$" >NUL || (cls & Goto :usuarios)

Goto :op%op%


Saludos
Título: Re: [Batch] Se me cae el script
Publicado por: $Edu$ en 23 Mayo 2012, 15:38 PM
O usar mi codigo..
Título: Re: [Batch] Se me cae el script
Publicado por: VivaElPirateo en 4 Junio 2012, 06:25 AM
Al presionar una sola vez la tecla espaciadora antes de poner un número, me bota igual es script.

Lo mismo pasa si antes pongo cualquiera de los signos !"#$%&&//())== antes de un número.


set "var="   
set /p "var=               Ingrese un n£mero entre el 1 y el 8 : "

Set "var=%var:^"=%" & REM "

echo "%var%" | FINDSTR "\<[1-8]\>" >NUL || (Goto :inicio)

Goto :var%var%


Ayudaaaaaaaa!!!!!!!!
Título: Re: [Batch] Se me cae el script
Publicado por: Eleкtro en 4 Junio 2012, 09:23 AM
deja esto así:

Código (dos) [Seleccionar]
echo "%var%"| FINDSTR "^\"[1-8]\"$" >NUL || (Goto :inicio)

saludos
Título: Re: [Batch] Se me cae el script
Publicado por: VivaElPirateo en 5 Junio 2012, 06:59 AM
Mil gracias de nuevo, Elektro HAcker y Edu.

Ahora mi script no se cae y parece más elegante!!!!


Millón de gracias!!!!!!!!!!!