Total Commander :: Раскладка файлов по папкам

through

[^/[Print]\]
Goto page 1, 2 Next :| |:
Total Commander -> Общие вопросы

#1: Раскладка файлов по папкам Author: Lnk,

Posted: Sat May 13, 2023 11:38
—
Здравствуйте.
Есть вопрос, довольно сложно его правильно сформулировать, но попробую. есть файлы напр (самому их выбирать желательно)
тест1.txt
тест2.txt
тест3.txt..
как бы сделать одной кнопкой в панели инструментов чтоб при нажатии на нее создались каталоги
тест1
тест2
тест3...
и в папку тест 1 был вложен тест1.txt, в тест2 - тест2.txt, тест3 - тест3.txt и тд
ну или хотя бы по 1 файлу подскажите как сделать.

я создал кнопку на панели инструментов на 1 файл
cm_MkDirOther,cm_GoToDir,cm_FocusTrg,cm_RenMov,cm_RightActivateTab5
но над там нажимать 2 раза энтер и папка остается на другой панели, а хотелось бы чтоб папка была там где был файл и без этих 2 нажатий энтер.

Вобще елси чесно не нашел как сделать напрмер команду cm_RenMov или cm_MoveOnly без подтвержения энтером(а хотелось бы)..
cm_Return не заменяет нажатия при создания каталога, он работает уже после создания, то есть входит в каталог.

#2: Author: imig73, Location: г. Иркутск

Posted: Sat May 13, 2023 12:28
—
Lnk
В принципе и так понятно. Нужен скрипт, создающий папки по именам файлов и помещающий эти файлы в созданные папки. Есть тут тема Создание папок с именем файлов в разделе Автоматизация Total Commander. Там на странице 2 найдёте готовый скрипт от Flasher, который у меня давно и исправно работает.

#3: Author: Lnk,

Posted: Sat May 13, 2023 12:55
—

imig73 wrote:

Lnk
В принципе и так понятно. Нужен скрипт, создающий папки по именам файлов и помещающий эти файлы в созданные папки. Есть тут тема Создание папок с именем файлов в разделе Автоматизация Total Commander. Там на странице 2 найдёте готовый скрипт от Flasher, который у меня давно и исправно работает.

спасибо, попробую понять чего там как.
к сожалению со скриптами дел не имел. думал мож через кнопку как то можно решить вопрос.

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

imig73
все получилось спасибо огромное!)

взял такое, скопировал

Set A = WSH.Arguments : C = A.Count : If C = 0 Then WSH.Quit
Set FSO = CreateObject("Scripting.FileSystemObject")
Set ShAp = CreateObject("Shell.Application")
Set List = FSO.OpenTextFile(A(0),,,-1)
If C = 3 Then _
Set Reg = New RegExp : Reg.Global = True:_
Reg.IgnoreCase = True : Reg.Pattern = A(2)
Do : F = Trim(List.ReadLine)
If FSO.FileExists(F) Then
BN = FSO.GetBaseName(F)
If IsObject(Reg) Then If Reg.Test(BN) Then _
BN = Reg.Execute(BN)(0).Submatches(0) Else BN = ""
If Len(BN) Then
NF = "" : If C > 1 Then If A(1) <> "" Then NF = FSO.BuildPath(A(1),BN)
If NF = "" Then NF = FSO.BuildPath(FSO.GetParentFolderName(F), BN)
If Not FSO.FolderExists(NF) Then FSO.CreateFolder(NF)
ShAp.NameSpace(NF).MoveHere F
End If
End If
Loop Until List.AtEndOfStream : List.Close

обозвал cat.vbs, сунул этот файл в панель инструментов
с параметром %WL "" ^([^.]+)\.(.+) "$1 [$2]"

и полученная кнопка успешно работает)) красота)))

#4: Author: Monarch-LFV,

Posted: Sat May 13, 2023 13:25
—
Lnk
Можно и без скрипта, в ИГП прописать: [N]/[N]

#5: Author: Lnk,

Posted: Sat May 13, 2023 13:29
—

Monarch-LFV wrote:

Lnk
Можно и без скрипта, в ИГП прописать: [N]/[N]

хм а ИГП это что?

#6: Author: Monarch-LFV,

Posted: Sat May 13, 2023 13:32
—
Lnk
Инструмент группового переименования (Ctrl+M).

#7: Author: Lnk,

Posted: Sat May 13, 2023 13:38
—

Monarch-LFV wrote:

Lnk
Инструмент группового переименования (Ctrl+M).

ого, я даж не знал что он умеет папки создавать) оч интересный вариант, спасибо огромное!)
кнопка удобней, но в Инструменте группового переименования можно с параметрами поэскпериментить)

#8: Author: Monarch-LFV,

Posted: Sat May 13, 2023 13:42
—
Для ИГП можно и кнопку сделать на панели. Подробнее поищите на форуме, сейчас помочь не могу, с телефона не удобно.

#9: Author: Lnk,

Posted: Sat May 13, 2023 13:51
—

Monarch-LFV wrote:

Для ИГП можно и кнопку сделать на панели. Подробнее поищите на форуме, сейчас помочь не могу, с телефона не удобно.

ну у мя кнопка запуска то создана на ИГП, и он параметр запоминает, просто тыканий больше. сейчас решение есть на кнопку со скриптом, а ИГП для экспериментов пусть будет) там наверн к [N]/[N] еще чего нибудь можно добавлять, и будет изменение назв каталога или файла, оч удобно.

Monarch-LFV а вы не знаете случайно на вот такую кнопку cm_SelectCurrentExtension,cm_RenMov как можно сделать чтоб не запрашивал подтверждения? это выделяет и перемещает все файлы с одним расширением.

#10: Author: Monarch-LFV,

Posted: Sat May 13, 2023 13:58
—
Lnk
Уже за компьютером, нашел решение:
Сохранить шаблон, например "123", и далее сделать кнопку с командой:

Code:

MULTIRENAME==123

#11: Author: imig73, Location: г. Иркутск

Posted: Sat May 13, 2023 13:58
—

Lnk wrote:

с параметром %WL "" ^([^.]+)\.(.+) "$1 [$2]"

Чото мудрёные какие-то параметры, достаточно просто %L%
C ИГП + встроенные команды + сохранённый шаблон [N]/[N] тоже можно, но что-то нет пока желания. Подождём что Monarch-LFV покажет Smile

Monarch-LFV
Благодарю. Будем посмотреть и если всё хорошо, скрипт сотру.

#12: Author: Lnk,

Posted: Sat May 13, 2023 14:12
—

Monarch-LFV wrote:

Lnk
Уже за компьютером, нашел решение:
Сохранить шаблон, например "123", и далее сделать кнопку с командой:

Code:

MULTIRENAME==123

сделал кнопку , команду написал MULTIRENAME==123(шаблон сохранил, но как файл он его не выводит)
параметр в кнопку вписал %P%N
нажимаю ничего не происходит, не удается найти указанный файл пишет..
и без параметров тоже

imig73, с %L% не работает скрипт

#13: Author: Monarch-LFV,

Posted: Sat May 13, 2023 14:16
—
Lnk
Что ты вы явно сделали не то. В ИГП прописать то, что я говорил выше:
[N]/[N]
Далее нужно сохранить как шаблон (справа кнопка в том же ИГП) с именем "123".
далее вот уже готовая кнопка (скопируйте и вставьте на панель правой кнопкой мыши):

Code:

TOTALCMD#BAR#DATA
MULTIRENAME==123

wcmicons.dll,46

#14: Author: Lnk,

Posted: Sat May 13, 2023 14:24
—

Monarch-LFV wrote:

Lnk
Что ты вы явно сделали не то. В ИГП прописать то, что я говорил выше:
[N]/[N]
Далее нужно сохранить как шаблон (справа кнопка в том же ИГП) с именем "123".
далее вот уже готовая кнопка (скопируйте и вставьте на панель правой кнопкой мыши):

Code:

TOTALCMD#BAR#DATA
MULTIRENAME==123

wcmicons.dll,46

да видимо не вьезжаю в суть, у мя тотал коммандер пауер пак, там ИГП имеет свою кнопку, тычу на него там прописываю [N]/[N] и сохраняю шаблон. выхожу. тычу на вертикальной панели создать кнопку, прописываю команду MULTIRENAME==123. при тыканьи этой кнопки происходит чего написал..
ну ниче страшного, скрипт работает)
а кто понял и сработало - тому уверен пригодится через MULTIRENAME==123)

#15: Author: imig73, Location: г. Иркутск

Posted: Sat May 13, 2023 14:24
—
Lnk
Шаблон ИГП сохраняется в секции [Rename] файла wincmd.ini. Открыть ИГП, вписать в поле 'Маска для:' [N]/[N] и нажать F2 > Сохранить шаблон, ввести имя 123. Всё, шаблон готов и больше ничего не трогаем.
Готовая кнопка выглядит так:

Code:

TOTALCMD#BAR#DATA
MULTIRENAME==123

Wcmicons.dll,72
Каталоги по именам файлов и переместить в них выделенные файлы

-1

Скопируй код выше и вставь себе на панель, появится кнопка.

Monarch-LFV
Работает нормально. Скрипт убираю в архив, ещё раз спасибо.

Total Commander -> Общие вопросы

output generated using printer-friendly topic mod. All times are GMT + 4 Hours

Goto page 1, 2 Next :| |: Page 1 of 2