How do I replace a file name with something else?

[hitoshi]

I want to make a script that will ask for the dir to look in to rename the files in that folder. I would like to to keep the orginal name that it has but just replace a letter that is in it with something else. It could ask me what to replace and what to replace it with.

Ex - This.Is.The.File010305--

I would put in a . and ask to replace it with a space.

After - This Is The File010305--

Is this possible?

[guinness]

Use StringReplace() & FileMove().

[hitoshi]

Thank you.

I'll try and see what I can do but I am new to autoit

[hitoshi]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$Searchandreplace = GUICreate("Searchandreplace", 451, 201)
$dir = GUICtrlCreateInput("", 96, 24, 321, 21)
$replacethis = GUICtrlCreateInput("", 208, 80, 209, 21)
$Label1 = GUICtrlCreateLabel("Replace This:", 128, 80, 70, 17)
$Label2 = GUICtrlCreateLabel("With This:", 152, 128, 52, 17)
$replacewith = GUICtrlCreateInput("", 208, 128, 209, 21)
$Label3 = GUICtrlCreateLabel("Directory:", 40, 24, 49, 17)
$Button1 = GUICtrlCreateButton("Start", 344, 168, 75, 25)
GUISetState(@SW_SHOW)

$newstring = StringReplace($dir, $replacethis, $replacewith)


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
        Case $Button1
            FileMove($dir, $newstring)
            Exit

EndSwitch

WEnd

This is all I have at the moment, kinda stuck.

I don't know how to make it rename all the files in a directory.

Maybe I should try to make it where I just pick the files I want it to rename that would probably be better. Not sure if I even know how to do that though.

Anyone have any thoughts?

Edit: Changed code.

Edited June 24, 2011 by hitoshi

[BrewManNH]

Do they all start with the same characters, just end with different numbers for instance? If so you can always use the command line to do it with a simple rename command like this

Run(@Comspec & '/c ren "This.Is.The.File*.*" "This Is The File*.*"')

Untested, but that's the command line command to do it in Windows.

[hitoshi]

I want to use it to change file names for.

Like the season 1 of NCIS I have all the files are like this:

NCIS.S01E01.HDTV.-LOL.[KLD]

NCIS.S01E02.HDTV.-LOL.[KLD]

NCIS.S01E03.HDTV.-LOL.[KLD]

ect.

I would like a script so that I could replace all the file names quickly to make it look like this.

NCIS S01E01

NCIS S01E02

NCIS S01E03

But I don't even know if its possible, I know that I can't seem to figure it out lol, but I don't really know what I'm doing.

[LurchMan]

Look up _FileListToArray() in the help file. you can create a For...Next loop and loop through the file names and do a stringreplace on all the names and then do a file move and move it to the same location.

example:

#include <file.au3>

$FullPath = "C:\files"

$aFiles = _FileListToArray ($FullPath, "*")

For $iFile = 1 To $afiles[0]
    $newname = StringReplace ($aFiles[$iFile], ".", " ")
    FileMove ($FullPath & "\" & $aFiles[$iFile], $FullPath & "\" & $newname)
Next

Note: Code is untested.

Edited June 24, 2011 by LurchMan

[hitoshi]

Thank you LurchMan for that code.

It does work but there is a problem.

It removes the . at the end of the file to make it an file.avi so is there anyway to get around that?

[LurchMan]

Thank you LurchMan for that code.

It does work but there is a problem.

It removes the . at the end of the file to make it an file.avi so is there anyway to get around that?

As long as they are always avi files this will work

#include <file.au3>

$FullPath = "C:\files"

$aFiles = _FileListToArray ($FullPath, "*")

For $iFile = 1 To $afiles[0]
    $newname = StringReplace ($aFiles[$iFile], ".", " ")
    FileMove ($FullPath & "\" & $aFiles[$iFile], $FullPath & "\" & StringTrimRight($newname, 3) & ".avi")
Next

Once again untested.