Windowsでファイル名の先頭３文字を削除したい（vbスクリプト編）

あるフォルダ内に入っている多数のファイルをリネームしたい場合の手順です。

バッチファイルではできないですが、その代わりvbスクリプトでやることができます。

手順
下記のvbスクリプトを作成します。

------aaaaaa.vbs------
set fso = createObject("Scripting.FileSystemObject")
set folder = fso.getFolder(fso.getParentFolderName(WScript.ScriptFullName))
for each file in folder.files
fso.Movefile file.name, Right(file.name, len(file.name)-3)
next
-------------------------

リネームしたいフォルダにaaaaaa.vbsファイルを置き、ダブルクリックで実行します。
vbsファイル自体もファイル名が３文字減ります。


※どうしてもバッチファイルにしなければならない場合、Windowsでファイル名の先頭３文字を削除したい（Excel+バッチファイル編） の手順で実現することができます。