Ms-Dos - Renombrar ficheros

@echo off

for %%f in (*.jpg) do (set archivo=%%f&call :renombrar)

pause

:renombrar

set quitar=%archivo:-=%

rename "%archivo%" "%quitar%"

goto:eof

@echo off

for %%a in (*.jpg) do echo %%~na_%%~xa>temp.tmp

for /F "delims=-. tokens=1-7" %%a in (Temp.tmp) do (

    ren "%%a-%%b-%%c %%d.%%e.%%f.%%g" "IMG_%%a%%b%%c_%%d%%e%%f.%%g"

)

del temp.tmp

ren "2014-11-17 09 35.27_.jpg." "IMG_20141117 09_3527_jpg."

@echo off

for %%a in (*.jpg) do echo %%~na-%%~xa>temp.tmp

for /F "delims=- tokens=1-4" %%a in (Temp.tmp) do (

    ren "%%a-%%b-%%c%%d" "IMG_%%a%%b%%c%%d"

)

del temp.tmp

@echo off

for %%a in (*.jpg) do Call :Renombra "%%~na" %%~xa

goto :EOF

:Renombra

   SET Nom=%1

   SET Ext=%2

   SET Nom=%Nom:~1,-1%

   SET New=%Nom:-=%

   ren "%Nom%%Ext%" "IMG_%New%%Ext%"

@echo off

for %%a in (*.jpg) do Call :renombra %%~na %%~xa

goto :EOF

:Renombra

   SET Nom=%1 %2

   SET Ext=%3

   SET New=%Nom:-=%

   ren "%Nom%%Ext%" "IMG_%New%%Ext%"

@echo off

for %%a in (*.jpg) do (

   SET Nom=%%~na

   SET Ext=%%~xa

   SET New=%Nom:-=%

   ren "%Nom%%Ext%" "IMG_%New%%Ext%"

)

echo ren "%Nom%%Ext%" "IMG_%New%%Ext%"

2014-11-17 09.35.27.jpg

IMG_20141117_093527.jpg

@echo off

for %%a in (*.jpg) do Call :renombra %%~na %%~xa

goto :EOF

:Renombra

   SET Fec=%1

   SET Hor=%2

   SET Ext=%3

   SET New_Fec=%Fec:-=%

   SET New_Hor=%Hor:.=%

   ren "%Fec% %Hor%%Ext%" "IMG_%New_Fec%_%New_Hor%%Ext%"

ren "2014-11-17 09.35.27.jpg" "IMG_20141117_093527.jpg"