Перемещение\копирование файлов без подтверждения

Обсуждение Total Commander. Установка, использование, настройка, решение проблем, скрытые функции. Обсуждение новых версий.

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

Lnk
Сообщения: 99
Зарегистрирован: Сб май 13, 2023 10:16

Перемещение\копирование файлов без подтверждения

Сообщение Lnk »

Вопрос такой - создал кнопку на панели, в команде прописал cm_SelectCurrentExtension,cm_RenMov ( то есть она сперва выделяет все файлы с выбранным расширением, а потом нажимает Ф6) при нажатии этой кнопки выводится запрос перместить? можно ли сделать так что он без запроса перемещал?
ну то етсь как будто нажмешь Ф6 и все файлы просто переместятся в другую панель без доп нажатий.
надеюсь понятно написал вопрос..можно ли такое?
Аватара пользователя
LonerD
Сообщения: 1174
Зарегистрирован: Вт янв 04, 2011 03:56
Откуда: Макеевка
Контактная информация:

Сообщение LonerD »

Я себе таким скриптом на AutoHotkeyV1 сделал для копирования и перемещения Тоталом (суть простейшая - вызов окна и автоматическое нажатие кнопки подтверждения):

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

; Total Commander DreamLair                        ;
; Script: Copy-move without confirmation           ;
; Required: Total Commander >=10.00                ;
; Script author: LonerD                            ;
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
; Parameter:                                       ;
;    m or move - move files                        ;
;    any another - copy files                      ;
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;

#NoEnv
#NoTrayIcon
#SingleInstance ignore
SetKeyDelay, 20, 20

if not ( WinExist("ahk_class TTOTAL_CMD") || WinActive("ahk_class TTOTAL_CMD") )
  ExitApp
WinGet, hw_TTOTAL_CMD, ID, A

CopyMove = %1%
if ( ( CopyMove = "m" ) || ( CopyMove = "move" ) )
  cm := 1005
  else
    cm := 3101

Gosub, SetTC3264
ButtonOK := TC3264 = 32 ? "TButton5" : "Button13"

PostMessage, 0x433, % cm,,, ahk_class TTOTAL_CMD
WinWait, ahk_class TInpComboDlg
Sleep, 20
SendMessage, 0x201,,, % ButtonOK, ahk_class TInpComboDlg
SendMessage, 0x202,,, % ButtonOK, ahk_class TInpComboDlg
ExitApp

;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
; Total Commander Architecture (32 or 64 bit)      ;
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
SetTC3264:
if ( A_Is64bitOS = 0 )
  TC3264 := 32
else
{
  WinGet, TCControls, ControlList, % "ahk_id " hw_TTOTAL_CMD
  Loop, Parse, TCControls, `n, `r
  {
    if ( A_LoopField ~= "ListBox(1|2|3)" )
    {
      TC3264 := A_LoopField ~= "TMyListBox(1|2|3)" ? 32 : 64
      break
    }
  }
}
Return
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
Последний раз редактировалось LonerD Сб май 13, 2023 22:59, всего редактировалось 3 раза.
Windows 11 | TC DreamLair eternal pre-α
Lnk
Сообщения: 99
Зарегистрирован: Сб май 13, 2023 10:16

Сообщение Lnk »

LonerD писал(а):Я себе таким скриптом на AutoHotkeyV1 сделал:
...
хм автохоткея нету у мя. незнакомая штука.. но спасибо.
мне б на крайняк скриптом бы тогда хотя бы.. конеш через простую кнопку лучше было б..
Аватара пользователя
Monarch-LFV
Сообщения: 363
Зарегистрирован: Пн июл 22, 2019 13:20

Сообщение Monarch-LFV »

Lnk
Создайте файл *.bat с текстом:

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

:: Параметры запуска %P%N %T
move %~dp1*%~x1 %2
Закинуть его на панель кнопок и в параметрах, соответственно прописать, что написано.
Lnk
Сообщения: 99
Зарегистрирован: Сб май 13, 2023 10:16

Сообщение Lnk »

Monarch-LFV писал(а):Lnk
Создайте файл *.bat с текстом:

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

:: Параметры запуска %P%N %T
move %~dp1*%~x1 %2
Закинуть его на панель кнопок и в параметрах, соответственно прописать, что написано.
работает шикарно! спасибо огромное Monarch-LFV !
теперь многократно быстрей будет мне работать с файлами)

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

Monarch-LFV но есть одна странность, если
в заголовке папки есть пробел то уже не работает.
а с каталогами одинаковыми названиями но с цифрами- вобще странно, к примеру если есть
Inf
Inf 1
то даже при открытой папке Inf 1 перенесет в папку Inf :shock:
немного неудобно, не знай почему так, но ничего страшного, прост буду учитывать такое
Аватара пользователя
Monarch-LFV
Сообщения: 363
Зарегистрирован: Пн июл 22, 2019 13:20

Сообщение Monarch-LFV »

Lnk
Да, для пробелов не хватает кавычек, нужно вот так:

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

:: Параметры запуска %P%N "%T"
move "%~dp1*%~x1" %2
Обратите внимание на кавычки в параметрах.
Lnk
Сообщения: 99
Зарегистрирован: Сб май 13, 2023 10:16

Сообщение Lnk »

Monarch-LFV писал(а):Lnk
Да, для пробелов не хватает кавычек, нужно вот так:

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

:: Параметры запуска %P%N "%T"
move "%~dp1*%~x1" %2
Обратите внимание на кавычки в параметрах.
да, добавил ковычки лучше стало, но не во все папки перемещает.. хммм..
например в такого вида папку не хочет c:\Users\Администратор\Downloads\Compressed\
жаль не видно что пишет, автозакрывает же батник
Аватара пользователя
imig73
Сообщения: 285
Зарегистрирован: Вт июн 18, 2013 13:21
Откуда: г. Иркутск

Сообщение imig73 »

Lnk
Путь к батнику:
%comspec% /k D:\move-x.cmd
Аватара пользователя
Monarch-LFV
Сообщения: 363
Зарегистрирован: Пн июл 22, 2019 13:20

Сообщение Monarch-LFV »

В конце батника пропишите команду pause.
И посмотрите что пишет.
Lnk
Сообщения: 99
Зарегистрирован: Сб май 13, 2023 10:16

Сообщение Lnk »

Monarch-LFV писал(а):В конце батника пропишите команду pause.
И посмотрите что пишет.
ошибка в синтаксисе команды пишет..

Добавлено спустя 4 минуты:
imig73 писал(а):Lnk
Путь к батнику:
%comspec% /k D:\move-x.cmd
в путь запуска попробовал записать в кнопке. ничего не меняется что работало то работает

///
а тут наткнулся на такое вот

TOTALCMD#BAR#DATA
%comspec% /c
? md "%P%O" && move %P%N "%P%O"
%Commander_Path%\WCMICONS.DLL,63
Move file under cursor into new directory

1
-1

ето не пригодится как нибудь? но тут я так понял каталог еще создается
Последний раз редактировалось Lnk Сб май 13, 2023 16:15, всего редактировалось 1 раз.
Аватара пользователя
Monarch-LFV
Сообщения: 363
Зарегистрирован: Пн июл 22, 2019 13:20

Сообщение Monarch-LFV »

А конкретнее? Там кроме этого еще есть текст вообще-то.
Lnk
Сообщения: 99
Зарегистрирован: Сб май 13, 2023 10:16

Сообщение Lnk »

Monarch-LFV писал(а):А конкретнее? Там кроме этого еще есть текст вообще-то.
С\move C\files\for copy!\*.pdf "C:\Users\Администратор\Downloads\pics"
ошибка в синтаксисе команды

уф сорри долго переписывал

причем интерсно елси напр из c:\IDL\ в c:\files\dl from brow\ то норм перемещает. вот обратно уже нет, пишет что ошибка
Аватара пользователя
Monarch-LFV
Сообщения: 363
Зарегистрирован: Пн июл 22, 2019 13:20

Сообщение Monarch-LFV »

Lnk
Вы внимательно прочитали мой второй код? Там кавычки не упустили в самом батнике? Перепроверьте.
PS. Ох и достанется вам от модератора за оформление сообщений, ждите... На форуме правила русского языка никто не отменял! Будете писать в таком духе, ждите бан.
Lnk
Сообщения: 99
Зарегистрирован: Сб май 13, 2023 10:16

Сообщение Lnk »

Monarch-LFV писал(а):Lnk
Вы внимательно прочитали мой второй код? Там кавычки не упустили в самом батнике? Перепроверьте.
PS. Ох и достанется вам от модератора за оформление сообщений, ждите... На форуме правила русского языка никто не отменял! Будете писать в таком духе, ждите бан.
айяй кажется реально где то я ошибся. сейчас вобще удалил батник старый и новый создал. и вроде все работает. ДИКО ИЗВИНЯЮСЬ!(((
спасибо большое!!!

PS насчет правил не знаю, я ж на форум пришел а не в клуб русского... пишу по теме просто. если что не так - сорри.
Аватара пользователя
Monarch-LFV
Сообщения: 363
Зарегистрирован: Пн июл 22, 2019 13:20

Сообщение Monarch-LFV »

Lnk
Еще вариант без батника, сразу кнопка:

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

TOTALCMD#BAR#DATA
cmd /c
move "*.%E" "%T"
WCMICONS.dll,59
Переместить все файлы с таким же расширением в другую панель
Ответить