массово переименовать растры

[tito]

всем привет. вопрос. у меня есть 900 привязанных растра, мне нужно массово переименовать их под наш реестр (пример х-28-65-В-г-4 ,а надо 4721) как мне это сделать так чтоб еще и осталось старое название.

[Mitrich]

поскольку из х-28-65-В-г-4 4721 никак не следует (прозрачно), то создать .bat или .cmd файл с множеством команд copy для каждого файла
copy file1 toDir\to_file1
copy file2 toDir\to_file2
....

и запустить
может так?

[Boris]

Для полного ответа неминуемо надо знать принцип по которому буквенная номенклатура превращается в цифровую. Если вопрос именно в этом, то так и надо сказать. Если же у вас уже ЕСТЬ таблица, база данных или что-то еще, где соответствие задано, или имеется "волшебная" формула перевода - то тогда задача тривиальна и решается на раз.

[bim2010]

Вам необходимо найти команду на известном Вам языке программирования ADIR() - копирование информации обо всех файлах указанного каталога в массив.

Код: Выделить всё

/ way  - путь источника
/ xwaynew - путь приемника
/  xalgoritm() – алгоритм  перевода  из одной системы  в другую
xway=ALLTRIM(way)
qf=adir(adf,xway+"*.*","D")
/   массив adf будет содержать информацию обо всех файлах указанного каталога 
/  (с подкаталогами, поскольку применена опция "D").
/  adf[1,1] - имя файла
/  adf[1,2] - размер
/  adf[1,3] - дата создания
/  adf[1,4] - время создания
/  adf[1,5] - атрибуты файла
/  в этом цикле данные читаются из массива и создаются в новом каталоге 
for j=1 To qf   
  mnameold=xway+adf[j,1]
  mnamenew=xwaynew+ xalgoritm(adf[j,1])
  COPY  &mnameold TO  &mnamenew
next