Страница 1 из 1
массово переименовать растры
Добавлено: 19 май 2009, 10:47
tito
всем привет. вопрос. у меня есть 900 привязанных растра, мне нужно массово переименовать их под наш реестр (пример х-28-65-В-г-4 ,а надо 4721) как мне это сделать так чтоб еще и осталось старое название.
Re: help
Добавлено: 19 май 2009, 15:58
Mitrich
поскольку из х-28-65-В-г-4 4721 никак не следует (прозрачно), то создать .bat или .cmd файл с множеством команд copy для каждого файла
copy file1 toDir\to_file1
copy file2 toDir\to_file2
....
и запустить
может так?
Re: массово переименовать растры
Добавлено: 21 май 2009, 17:12
Boris
Для полного ответа неминуемо надо знать принцип по которому буквенная номенклатура превращается в цифровую. Если вопрос именно в этом, то так и надо сказать. Если же у вас уже ЕСТЬ таблица, база данных или что-то еще, где соответствие задано, или имеется "волшебная" формула перевода - то тогда задача тривиальна и решается на раз.
Re: массово переименовать растры
Добавлено: 21 май 2009, 19:23
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