products/Sources/formale Sprachen/Fortran/  image not shown  

Quellcode-Bibliothek

© Kompilation durch diese Firma

[Weder Korrektheit noch Funktionsfähigkeit der Software werden zugesichert.]

Datei: removebrackets.bat   Sprache: BAT

@echo off
set dir = %1
echo **********************************
echo put this bat file into the
echo directory where you want to
echo remove ( and ) and space from
echo filenames and add leading zeroes
echo **********************************
echo  rename all files in current directory ???
pause
cd %1
setlocal enabledelayedexpansion
for %%a in (*.*) do (
 set f=%%a
 rem -----------------------
 set f=!f:^ (1)=001!
 set f=!f:^ (2)=002!
 set f=!f:^ (3)=003!
 set f=!f:^ (4)=004!
 set f=!f:^ (5)=005!
 set f=!f:^ (6)=006!
 set f=!f:^ (7)=007!
 set f=!f:^ (8)=008!
 set f=!f:^ (9)=009!
 for %%d in (1..9) do (
 rem -----------------------
 set f=!f:^ (%%d0)=010!
 set f=!f:^ (%%d1)=011!
 set f=!f:^ (%%d2)=012!
 set f=!f:^ (%%d3)=013!
 set f=!f:^ (%%d4)=014!
 set f=!f:^ (%%d5)=015!
 set f=!f:^ (%%d6)=016!
 set f=!f:^ (%%d7)=017!
 set f=!f:^ (%%d8)=018!
 set f=!f:^ (%%d9)=019!
)
 rem -----------------------
 set f=!f:^(=!
 set f=!f:^)=!
 set f=!f:^ 1)=01!
 ren "%%a" "!f!"
)

[ Seitenstruktur0.1Drucken  etwas mehr zur Ethik  ]