Страница 3 из 7

Добавлено: Сб окт 29, 2016 08:45
sa
r136a8
Если хватит терпения размножить требуемые названия файлов в текстовом редакторе, то можно воспользоваться инструментом группового переименования (Ctrl+M), в нём - Загрузить имена из файла… (F10).

Добавлено: Сб окт 29, 2016 09:25
Flasher
Не нужно тут терпение. Скрипт пишется буквально за 2-3 минуты.

Добавлено: Сб окт 29, 2016 10:09
Вахмурка
Ну да, кстати, можно и новый написать - конкретно под данную задачу. Но я напомню, что мой уже написан. Мы тут дольше языки чешем, чем ты бы просто использовал готовый скрипт или написал свой

Добавлено: Сб окт 29, 2016 10:39
Flasher
Вахмурка
Когда вся суть скрипта укладывается в 6-10 строк, предлагать идею с 400x3 и перемещениями, мягко говоря, несерьёзно.

Добавлено: Сб окт 29, 2016 10:41
Вахмурка
2Flasher
Мы тут дольше языки чешем

Добавлено: Сб окт 29, 2016 12:14
Flasher
ОК. Без чесни и с любой сортировкой, если всё так, как я понял (vbs):

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

' Параметр: %L
With CreateObject("Scripting.FileSystemObject")
  Set List = .OpenTextFile(WScript.Arguments(0))
  Do : F = List.ReadLine : N = .GetBaseName(F)
    If IsNumeric(N) And .FileExists(F) Then _
    .GetFile(F).Name = "set" & Int(N/3 - 0.1) + 1 & "-" & Int((N/3 - Int(N/3 - 0.1))*3 + 0.1) & ".png"
  Loop Until List.AtEndOfStream
End With

Добавлено: Пн окт 31, 2016 14:11
r136a8
Сегодня буду пробовать отпишу. Спасибо.
Вот еще раз для ясности. Есть файлы с 1 по 1095, эти файлы состоят из групп по 3 файла = 365 групп.
Все файлы находятся в одной папке и желательно переименовать их одним махом, чтоб не запутается и не забиться.

Добавлено: Пн окт 31, 2016 20:42
Flasher
Яснее не стало. Когда задают конкретные вопросы, логично на них и отвечать.

Добавлено: Вт ноя 01, 2016 10:04
sa
В 9.00 версии TC можно использовать инструмент группового переименования (Ctrl+M) с маской для имени файла set[C+1/3]-1, маской для расширения png. Лишние 1 с пробелом и скобками в именах убрать повторным вызовом группового переименования с маской для имени файла [N] и параметрами поиска и замены Найти:1 \((.+)\) Заменить на:$1 с галкой для "Рег. выраж."

Добавлено: Пт ноя 11, 2016 08:29
Avada
Предыдущая цепочка постов перенесена с некоторыми сокращениями из отдельной темы в уже существующую.

Переименование группы файлов по имени каталога

Добавлено: Сб янв 28, 2017 06:04
sibirnik
Нужна кнопка для решения задачи:
Имеется N-количество каталогов с N-количеством в них файлов - нужно переименовать эти файлы по имени каталога с добавлением счётчика, если файлов N-количество. Вот так для примера: имя каталога_счётчик.расширение Спасибо.

Добавлено: Сб янв 28, 2017 11:01
Flasher
Есть тема, где спросить, и она перед глазами на первой странице.

Остаётся два вопроса.
1. Обрабатывать файлы в выбранных каталогах? Если да, то из какой сортировки исходить?
2. Если нет, то как будут выводиться файлы - через поиск или по Ctrl ( + Shift) + B?

Добавлено: Сб янв 28, 2017 12:03
sibirnik
Flasher
Спасибо! Работает, но маленько не так как я хотел. Нужно вручную открывать каждый каталог, выделять файлы в нём, а хотелось бы автомата, если это возможно.Выбрал N-количество каталогов - нажал на кнопочку и дело сделано. В каждом каталоге файлы переименованы по имени каталога.

Добавлено: Сб янв 28, 2017 12:06
Flasher
sibirnik
См. выше. Файлы можно вывести без подкаталогов.

Добавлено: Сб янв 28, 2017 12:18
Staniclaw
sibirnik
В случае, если позже потребуется таким образом переименовывать файлы в одном-двух каталогах (т. е. не массово), можно будет воспользоваться инструментом группового переименования с плагином FileX: зайти в каталог, выбрать файлы, вызвать ИГП с маской [=filex.ParentDir].[C]