> Jeg har 1800 filer jeg skal omdøbe f .eks
>
> 100101.jpg til 101101_101_1.jpg
>
> kender nogen noget software som nemt kan gøre dette arbejde for mig,
> frem for at jeg skal gøre det manuelt....
>
> Fil-navnene er forskellige og må IKKE ændres, til f. eks nummerisk
> rækkefølge, de skal beholde deres filnavn, der skal " bare" tilføjes
> "_101_1 "
Næste gang kan du overveje VBScript - Indbygget i windows :)
Det er det eneste jeg bruger det til faktisk ;) Gem dette som "omdoeb.vbs":
Input = "_101_1"
Dir = InputBox("What directory?")
Set fs = CreateObject("Scripting.FileSystemObject")
Set dirObj = fs.GetFolder(Dir)
Set FileCollection = dirObj.Files
For Each File In FileCollection
fname = Left(File.Name,Len(File.Name)-4)
ext = Right(File.Name,4)
newName = fname + Input + ext
File.Name = newName
Next
--
-
Lars
http://coder.dk/sohofaq.php - Uofficiel WOL SOHO 77 FAQ
http://wshlman.moons.dk/ - Say goodbye to GameSpy - A Free Half Life
Manager!
To mail me remove your-pants.