Как скопировать файл под разными именами из списка имен?

Обсуждение вопросов автоматизации Total Commander с помощью сторонних программ и скриптовых технологий.

Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер

Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

NAA писал(а):Так ведь речь шла о списке файлов :D
Речь шла и о том и о другом. Важно, что написано в заголовке скрипта без всяких домыслов. В справке, правда, тоже почему-то про папки не написали. :?
Создаёт файл списка в каталоге, заданном переменной TEMP, с именами выбранных файлов и добавляет имя этого файла списка в командную строку.
NAA писал(а):Так, как сейчас получилось - нужно во вспомогательный каталог копировать фотографии одного объекта, напускать на этот каталог скрипт, удалять скопированные фотографии, затем копировать фотографии другого объекта, уже с другими координатами, и т. д.
Ну, уж извините'с, так было описано в исходном посте:
NAA писал(а):Эталонный XMP-файл я создал. Теперь задача: размножить этот файл по папкам с фотографиями.
NAA писал(а): я сначала выделил в текущем каталоге фото одного объекта, напустил скрипт, затем подправил бы файл с координатами, выделил второй объект, и т. д. - пока все объекты не будут охвачены.
А не проще делать автозамену координат в выбранных xmp?
И нет ли какого-то связующего компонента в фото, чтобы по ним сразу подставлять координаты (в имени, дате или ещё в чём)?
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
NAA
Сообщения: 18
Зарегистрирован: Пт дек 05, 2014 22:40

Сообщение NAA »

Flasher писал(а):Ну, уж извините'с, так было описано в исходном посте:
NAA писал(а):Эталонный XMP-файл я создал. Теперь задача: размножить этот файл по папкам с фотографиями.
Ну да, при этом предложением раньше:
NAA писал(а):Я знаю, что если я создам файлы в формате XMP с координатами и дам им те же имена, что и CR2-файлы, то RAW-конвертер автоматически подхватит координаты из одноименных XMP-файлов.
Т. е. вбиваем координаты в файл, копируем в папку назначения, перебиваем координаты, копируем в папку назначения (ту же или другую), и т. д.
Flasher писал(а):А не проще делать автозамену координат в выбранных xmp?
Честно говоря, не представляю, как это можно сделать простым способом.
Flasher писал(а):И нет ли какого-то связующего компонента в фото, чтобы по ним сразу подставлять координаты (в имени, дате или ещё в чём)?
Думаю, что простого и однозначного способа не найдется. Имена я сам вручную даю. По дате - было бы просто, но ведь я могу вернуться к этому объекту и снова его сфотографировать. Так часто бывает: сначала стараешься всё сфотографировать, чтобы успеть, а потом смотришь: ага, люди разошлись, можно вернуться без людей сфотографировать.

Добавлено спустя 2 минуты:

Так, как получилось - это, конечно, большой прорыв. Потому что иначе вообще пришлось бы полностью вручную делать.
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

NAA писал(а):Честно говоря, не представляю, как это можно сделать простым способом.
Используя те же скрипты замены (1, 2, 3, [s]4[/s], [s]5[/s]).

Что касается выделения файлов, то меняем 20-27 строки на эти:

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

    F = Trim(.ReadLine)
    If F <> "" And FSO.FileExists(F) And StrComp(FSO.GetExtensionName(F),Ex) = 0 Then _
    FSO.CopyFile File, FSO.GetParentFolderName(F) & "" & FSO.GetBaseName(F) & "." & Ext, 0
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
NAA
Сообщения: 18
Зарегистрирован: Пт дек 05, 2014 22:40

Сообщение NAA »

Flasher писал(а):Что касается выделения файлов, то меняем 20-27 строки на эти:

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

    F = Trim(.ReadLine)
    If F <> "" And FSO.FileExists(F) And StrComp(FSO.GetExtensionName(F),Ex) = 0 Then _
    FSO.CopyFile File, FSO.GetParentFolderName(F) & "" & FSO.GetBaseName(F) & "." & Ext, 0
Работает! Спасибо!
NAA
Сообщения: 18
Зарегистрирован: Пт дек 05, 2014 22:40

Сообщение NAA »

Спасибо за решение моей проблемы! Постоянно пользуюсь этим скриптом :D
Ответить