Переименование папки и файлов

[Piratos]

Всем привет! Помогите не знаю что делать, в VBS полный нуль.
Есть такая задача:
Папка на шаре \\имясервера\scan\TIF Documents в ней после сканирования появляются файлы типа 001PBU4F.TIF, 002PBU4F.TIF и так далее (первые 3 цифры-порядковые номера, последние номер партии-они не постоянны), нужно переименовать эти файлы по порядку к такому виду x001.tif,x002.tif и так далее (х -постоянна) потом переименовать эту папку "TIF Documents" с запросом имени папки у юзера (запрос нужен - для сканера штрихкода).
Можно не переименовывать папку TIF Documents - а создать новую там же с запросом имени и потом все файлы переместить в новую.
Я всё это сварганил на бат - но сканер штрихкода не пересылает в окно CMD название. Нужно как раз VBS.
Заранее благодарен.

[Iska]

последние номер партии-они не постоянны »
«Последние» — это какие именно? По приведённому примеру это непонятно.

нужно переименовать эти файлы по порядку к такому виду x001.tif,x002.tif и так далее »
Что означает «по порядку»? По какому принципу переименовать?

Я всё это сварганил на бат »
Как именно производится исполнение данного пакетного файла?

[Piratos]

Спасибо что ответили.
1. Последние - это которые идут после 3-х цифр (остальные 5), т.е так задумано производителем сканера-чтоб сканировать партии в одну папку и различать их по последним 5 символам-чтоб узнать принадлежность листа к партии. Я хотел сканировать в эту папку только одну партию до 160 листов(значит 5 символов у этих листов будут одинаковы).
2. по порядку - это значит что нельзя листы путать, т.е 001PBU4F.TIF=x001.tif, 002PBU4F.TIF=x002.tif.
3. Пишу с ноута в дороге не могу выложить батник.

P.S. Замудренно как то я написал.