Ver Mensaje Individual
  #3 (permalink)  
Antiguo 22/09/2011, 13:10
Avatar de Okuon
Okuon
 
Fecha de Ingreso: septiembre-2011
Ubicación: Aquí en el tercer planeta
Mensajes: 62
Antigüedad: 13 años, 3 meses
Puntos: 13
Respuesta: script para modificar el nombre de archivos en Windows

Modique el código anterior para que renombre sin omitir ninguna imágen JPG
ya que el código anterior requeria que se ejecutará varias veces hasta que no quedará ninguno sin renombrar. Además le hice otros ajustes.

Cita:
@ECHO OFF &SETLOCAL &CD /D "%~DP1"

SETLOCAL ENABLEDELAYEDEXPANSION
FOR /f "tokens=*" %%f in ('DIR "*.JPG" /B /A-D /ON ^|FINDSTR /C:"-000"') DO (Call:Clean1 "%%~nf" "%%~xf")
GOTO:END

:Clean1
SET e=%~2
SET e=%e:~1%
SET c="%~1.%e%"
SET n="%~1"
SET n=%n:-00000000=-00%
SET n=%n:-0000000=-00%
SET n=%n:-000000=-00%
SET n=%n:-00000=-00%
SET n=%n:-0000=-00%
SET n=%n:-000=-00%
SET n=%n:-00=-0%
SET n=%n:-0=-00%
SET n=%n:~1%
SET n=%n:~,-1%
IF NOT %c%=="%n%.%e%" (REN %c% "%n%.%e%")
GOTO:EOF

:Clean2
SET e=%~2
SET e=%e:~1%
SET c="%~1.%e%"
SET n="%~1"
SET n=%n:-00000000=-00%
SET n=%n:-0000000=-00%
SET n=%n:-000000=-00%
SET n=%n:-00000=-00%
SET n=%n:-0000=-00%
SET n=%n:-000=-00%
SET n=%n:-00=-0%
SET n=%n:-0=-00%
FOR %%f in ( -0 -00 -000 -0000 -00000 -000000 -0000000 -00000000 ) DO (SET n=!n:%%f=!)
SET n=%n:~1%
SET n=%n:~,-1%
ECHO.!c! "%n%.%e%"
REM IF NOT %c%=="%n%.%e%" (REN %c% "%n%.%e%")
GOTO:EOF

:END
EXIT

Última edición por Okuon; 22/09/2011 a las 20:01