Mensajes

Cierto culpa mia por no explicarme bien 

lo que pretendo es que el for carge el contenido del archivo activados.txt y use la funcion call para cada uno de esos archivos, pero que valla directamente a la etiqueta :AUTORUN que tendran los archivos.

ejemplo de los archivos a llamar:

Código [Seleccionar] Expandir

@echo off
@Echo OFF & Color 70 & MODE con cols=75
title ejemplo

:MAIN
echo.
echo Hola |MORE
pause
exit

:AUTORUN
echo.
echo adios |MORE
pause
exit

gracias por la ayuda, ya consegui que funcione   , dejo el codigo por si alguien le sirve de ayuda para otra cosa:

Código [Seleccionar] Expandir

@Echo OFF & Color 70 & MODE con cols=75
Title Animefiles 1.3.2

REM CD Plugins
if not exist ".\Plugins\Activados.txt" (
--------->".\Plugins\Activados.txt"
)

:MAIN
cls
SETLOCAL EnableDelayedExpansion
Set "Directory=%CD%\plugins"

For %%# in (
"%Directory%\*.bat"
) Do (
Set /A "FileCount+=1"
Set "File!FileCount!=%%~nx#"
)
echo.
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ |MORE
For /L %%X in (1, 1, !FileCount!) Do (
REM Type "%Directory%\activados.txt" | Findstr /V /I "!File%%X!" do (set info=Activado)
Type "%Directory%\activados.txt" | Findstr /I "!File%%X!" 1>NUL 2>&1 && (
set "info=Activado"
) || (
set "info=Desactivado"
)
REM if not defined info (set info=Desactivado)
REM Echo %%X. !File%%X! %info% | MORE
Echo %%X. !File%%X! !info! | MORE
)
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ|MORE
echo que quiere hacer? (Activar/desactivar)
echo.
set/p "menu=>"
if not defined menu (
ENDLOCAL
goto :MAIN
)
if %menu%==Activar goto ACTIVAR
if %menu%==ACTIVAR goto ACTIVAR
if %menu%==activar goto ACTIVAR
if %menu%==Desactivar goto DESACTIVAR
if %menu%==DESACTIVAR goto DESACTIVAR
if %menu%==desactivar goto DESACTIVAR
cls
echo.
echo Opcion no valida. |MORE
pause
ENDLOCAL
goto MAIN

:DESACTIVAR
echo.
echo Elija el plugin que quiere desactivar:
echo.
Set /P "SelectFiles=>"
Set SelectFiles2=%SelectFileS%.bat
Type "%Directory%\activados.txt" | Findstr /V /I "%SelectFiles2%">"%Directory%\activados.tmp"
Del /Q "%Directory%\activados.txt"
Rename "%Directory%\activados.tmp" "activados.txt"
cls
echo.
echo Plugin desactivado. |MORE
pause
goto END

:ACTIVAR
echo.
echo Elija el plugin que quiere activar:
echo.
Set /P "SelectFiles=>"
Set SelectFiles2=%SelectFileS%.bat
CD Plugins
if not exist %selectfiles2% (goto ERROR)
echo %selectfiles2%>>Activados.txt
cls
echo.
echo Plugin activado. |MORE
pause
goto END

:ERROR
cls
echo ÉÍÍÍÍÍÍÍÍÍÍÍ»
echo º   ERROR   º
echo ÈÍÍÍÍÍÍÍÍÍÍͼ |MORE
echo No existe un plugin con ese nombre. |MORE
Pause
goto END

:END
CD..
Start Animefiles
Exit



EleKtro H@cker la parte de:

Código [Seleccionar] Expandir

--------->Activados.txt

es solo para que el bat cree un archivo vacio llamado activados.txt, de la forma que tu lo pusiste el archivo contiene -----------

EDITO:Tengo una duda, esto funcionaria? o en caso de que no cual seria la forma correcta de escribirlo?

Código [Seleccionar] Expandir

FOR %%A IN ("activados.txt") DO (
               call %%A  & goto :AUTORUN
)

Hola, alguien podria decirme donde me estoy equivocando?

Tengo este code:

Código [Seleccionar] Expandir

@Echo OFF & Color 70 & MODE con cols=75
Title Animefiles 1.3.2

CD Plugins
if not exist Activados.txt (
--------->Activados.txt
)

:ACTIVAR
cls
SETLOCAL EnableDelayedExpansion
Set "Directory=%CD%\plugins"

For %%# in (
"%Directory%\*.bat"
) Do (
Set /A "FileCount+=1"
Set "File!FileCount!=%%~nx#"
)
echo.
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ |MORE
For /L %%X in (1, 1, !FileCount!) Do (
Type "%Directory%\activados.txt" | Findstr /V /I "!File%%X!" do (set info=Activado)
if not defined info (set info=Desactivado)
Echo %%X. !File%%X! %info% | MORE
)
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ|MORE
echo Seleccione el plugin que desea activar:
echo.
Set /P "SelectFiles=
Set "SelectFiles=%SelectFiles: =%"
For %%# in (%SelectFiles%) Do (
Echo "!File%%#!" >> Activados.txt
)
pause
exit


El programa se encuentra en la ruta .\Programfiles\Animefiles y tanto los bat como el archivo Activados.txt en el subdirectorio Plugins. Lo que intento es que el for a la vez que imprime en pantalla los bat disponibles en la carpeta plugins, compare sus nombres con los almacenados en el archivo Activados y segun eso, la variable info imprima desactivado si no estan o activado si estan en la lista.

Aprovecho el tema para preguntar un par de dudas que me han surgido al analizar la simplificación del code:

La primera es que hace esta linea:

Código [Seleccionar] Expandir

PUSHD "%Directory%" 2>NUL || (Call :ERROR "1")

Y la segunda no entiendo el funcionamiento de estos if y para que sirve POPD

Código [Seleccionar] Expandir

:ERROR
cls
echo ÉÍÍÍÍÍÍÍÍÍÍÍ»
echo º   ERROR   º
echo ÈÍÍÍÍÍÍÍÍÍÍͼ |MORE
If "%~1" EQU "1" (Echo No existe un directorio con ese nombre. |MORE)
If "%~1" EQU "2" (Echo No existe una lista con ese nombre. |MORE)
Pause
POPD

Si alguien me puede ayudar a resolver estas dudas...

Gracias! lo intentare por este metodo si lo consigo colgare el codigo por si alguien tiene el mismo problema.

Gracias por la ayuda!

Parece ser que el findstr no admitia la ruta mediante variables asi que puse la ruta directamente y funciona perfectamente:

Código [Seleccionar] Expandir

Type "C:\Program Files\Animefiles\Files\%File%" | Findstr /V /I "%borrar%">"C:\Program Files\Animefiles\Files\%File%.tmp"
pause
Del /Q "C:\Program Files\Animefiles\Files\%File%"
Rename "C:\Program Files\Animefiles\Files\%File%.tmp" "%File%"

En verdad asi me vale ya que el programa se encuentra en una ruta estatica. Gracias por el esfuerzo y la ayuda.

Solucionado!

Una cantidad indefinida, el menu deberia ser como una lista con todos los plugins que se hayan instalado en la carpeta plugins, para que el usuario eligiera cual quiere activar y cual no.

Perdon es mi culpa por no especificar. Estoy haciendo un programa bat que funciona mediante una serie de plugins bat que estan en una subcarpeta llamada Plugins.

El programa ejecuta automaticamente todos los plugins dentro de esa carpeta, pero tiene un inconveniente, que el programa ejecuta cada plugin por su nombre, que ya viene incluido en una linea dentro del propio bat principal y que el menu es estatico.

lo que yo necesito hacer y no se como es que el programa lea los nombres de los plugins almacenados en la carpeta y me muestre los nombres de esos plugins como un menu para elegir cuales quiero que se ejecuten junto con el programa al iniciar y cuales no.

Siento la confusion.

Solucionado el problema del for, pero sigue sin borrar el registro del txt sino que cierra el programa directamente.

Pongo el codigo modificado:

Código [Seleccionar] Expandir

@echo off
title Animefiles 1.3.2
COLOR 70
mode con: cols=75
set "ruta1=.\Files"
:RETURN
CD Files
cls
echo.
echo ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º  Eliminar un anime    º
echo ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ |MORE
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ |MORE
Dir /b
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ |MORE
Echo introduzca la lista de donde quiere eliminar un anime:
echo.
set/p "anime=>"
if not exist %anime%.txt goto ERROR2
if not defined anime goto RETURN
:RESETDEL
cls
echo.
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ |MORE
FOR /F "usebackq delims=" %%A IN ("%anime%.txt") DO (Echo.%%A) | MORE
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ |MORE
echo Para salir del modo, cerrar el programa. |MORE
echo Seleccione el anime a borrar:
echo.
set/p "borrar=>"
if not defined borrar goto resetdel
echo.
Type "%ruta1%\%anime%.txt" | findstr /V /I "%borrar%">"%ruta1%\%anime%.tmp"
Del /Q "%ruta1%\%anime%.txt"
Rename "%ruta1%\%anime%.tmp" "%anime%.txt"
cls
echo.
echo el anime ha sido eliminado satisfactoriamente. |MORE
pause
goto RESETDEL

:ERROR2
cls
echo ÉÍÍÍÍÍÍÍÍÍÍÍ»
echo º   ERROR   º
echo ÈÍÍÍÍÍÍÍÍÍÍͼ |MORE
echo No existe una lista con ese nombre. |MORE
pause
CD..
start Animefiles
exit

Llevo varias semanas comiendome la cabeza con este problema, sino se puede asi me vale alguna otra solucion. thaks!

Gracias! lo de la variable code es que le habia cambiado el nombre y no me di cuenta de sustituirlo en el if.

Pero sigue sin funcionar y ahora al sustituir el for al ejecutar en vez de mostrarme el contenido me pone:

No se esperaba = delims=" en este momento.

A que se debe?