Comments on: VB Script to Rename All Files in a Folder

By: Bo

Bo — Fri, 19 Aug 2011 18:58:39 +0000

I know this post is really old, but I just wanted to let you know that I looked all over the place for a solution like this and finally stumbled across your post. It was exactly what I needed.

I did have to retype all of the quotation marks into the script once I copied and pasted it into notepad. Windows doesn’t like the ones that were in your post.

Thanks a million!!

By: Andrew Chen

Andrew Chen — Fri, 10 Apr 2009 23:10:14 +0000

Thank Sen! I will check that out

By: SenHu

SenHu — Wed, 08 Apr 2009 14:23:32 +0000

Andrew:

Sounds like you enjoy posting automation scripts based on new ideas. I appreciate that - your effort helps out a lot of people.

Have you looked at biterscripting (http://www.biterscripting.com for free installation) ? It is simple to learn, but you can take it to a cerebral level. Documentation is available with the ‘help’ command. It is my guess that you will probably like posting scripts in biterscripting.

Sen

By: Andrew Chen

Andrew Chen — Tue, 10 Mar 2009 05:18:22 +0000

I think it should be easy to replace the following line with some if statements to implement whatever naming convention you want to follow.

fso.MoveFile file.Name, Replace(file.Name,”Transaction”,”Tran”)

for example you can have

if instr(file.name, “Transaction”)>0 then
fso.MoveFile file.Name, Replace(file.Name,”Transaction”,”Tran”)
end if

By: Dylan81

Dylan81 — Tue, 10 Mar 2009 01:37:08 +0000

What if all the files have different names?
Eg, all my photo files need renaming but they all have different naming conventions applied.
Cheers.