Страница 1 из 2
Перемещение\копирование файлов без подтверждения
Добавлено: Сб май 13, 2023 13:58
Lnk
Вопрос такой - создал кнопку на панели, в команде прописал cm_SelectCurrentExtension,cm_RenMov ( то есть она сперва выделяет все файлы с выбранным расширением, а потом нажимает Ф6) при нажатии этой кнопки выводится запрос перместить? можно ли сделать так что он без запроса перемещал?
ну то етсь как будто нажмешь Ф6 и все файлы просто переместятся в другую панель без доп нажатий.
надеюсь понятно написал вопрос..можно ли такое?
Добавлено: Сб май 13, 2023 14:24
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
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
Добавлено: Сб май 13, 2023 14:32
Lnk
LonerD писал(а):Я себе таким скриптом на AutoHotkeyV1 сделал:
...
хм автохоткея нету у мя. незнакомая штука.. но спасибо.
мне б на крайняк скриптом бы тогда хотя бы.. конеш через простую кнопку лучше было б..
Добавлено: Сб май 13, 2023 14:51
Monarch-LFV
Lnk
Создайте файл *.bat с текстом:
Код: Выделить всё
:: Параметры запуска %P%N %T
move %~dp1*%~x1 %2
Закинуть его на панель кнопок и в параметрах, соответственно прописать, что написано.
Добавлено: Сб май 13, 2023 15:34
Lnk
Monarch-LFV писал(а):Lnk
Создайте файл *.bat с текстом:
Код: Выделить всё
:: Параметры запуска %P%N %T
move %~dp1*%~x1 %2
Закинуть его на панель кнопок и в параметрах, соответственно прописать, что написано.
работает шикарно! спасибо огромное
Monarch-LFV !
теперь многократно быстрей будет мне работать с файлами)
Добавлено спустя 36 минут:
Monarch-LFV но есть одна странность, если
в заголовке папки есть пробел то уже не работает.
а с каталогами одинаковыми названиями но с цифрами- вобще странно, к примеру если есть
Inf
Inf 1
то даже при открытой папке Inf 1 перенесет в папку Inf
немного неудобно, не знай почему так, но ничего страшного, прост буду учитывать такое
Добавлено: Сб май 13, 2023 15:41
Monarch-LFV
Lnk
Да, для пробелов не хватает кавычек, нужно вот так:
Код: Выделить всё
:: Параметры запуска %P%N "%T"
move "%~dp1*%~x1" %2
Обратите внимание на кавычки в параметрах.
Добавлено: Сб май 13, 2023 15:55
Lnk
Monarch-LFV писал(а):Lnk
Да, для пробелов не хватает кавычек, нужно вот так:
Код: Выделить всё
:: Параметры запуска %P%N "%T"
move "%~dp1*%~x1" %2
Обратите внимание на кавычки в параметрах.
да, добавил ковычки лучше стало, но не во все папки перемещает.. хммм..
например в такого вида папку не хочет c:\Users\Администратор\Downloads\Compressed\
жаль не видно что пишет, автозакрывает же батник
Добавлено: Сб май 13, 2023 16:04
imig73
Lnk
Путь к батнику:
%comspec% /k D:\move-x.cmd
Добавлено: Сб май 13, 2023 16:04
Monarch-LFV
В конце батника пропишите команду pause.
И посмотрите что пишет.
Добавлено: Сб май 13, 2023 16:13
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
ето не пригодится как нибудь? но тут я так понял каталог еще создается
Добавлено: Сб май 13, 2023 16:14
Monarch-LFV
А конкретнее? Там кроме этого еще есть текст вообще-то.
Добавлено: Сб май 13, 2023 16:20
Lnk
Monarch-LFV писал(а):А конкретнее? Там кроме этого еще есть текст вообще-то.
С\move C\files\for copy!\*.pdf "C:\Users\Администратор\Downloads\pics"
ошибка в синтаксисе команды
уф сорри долго переписывал
причем интерсно елси напр из c:\IDL\ в c:\files\dl from brow\ то норм перемещает. вот обратно уже нет, пишет что ошибка
Добавлено: Сб май 13, 2023 16:25
Monarch-LFV
Lnk
Вы внимательно прочитали мой второй код? Там кавычки не упустили в самом батнике? Перепроверьте.
PS. Ох и достанется вам от модератора за оформление сообщений, ждите... На форуме правила русского языка никто не отменял! Будете писать в таком духе, ждите бан.
Добавлено: Сб май 13, 2023 16:34
Lnk
Monarch-LFV писал(а):Lnk
Вы внимательно прочитали мой второй код? Там кавычки не упустили в самом батнике? Перепроверьте.
PS. Ох и достанется вам от модератора за оформление сообщений, ждите... На форуме правила русского языка никто не отменял! Будете писать в таком духе, ждите бан.
айяй кажется реально где то я ошибся. сейчас вобще удалил батник старый и новый создал. и вроде все работает. ДИКО ИЗВИНЯЮСЬ!(((
спасибо большое!!!
PS насчет правил не знаю, я ж на форум пришел а не в клуб русского... пишу по теме просто. если что не так - сорри.
Добавлено: Сб май 13, 2023 16:49
Monarch-LFV
Lnk
Еще вариант без батника, сразу кнопка:
Код: Выделить всё
TOTALCMD#BAR#DATA
cmd /c
move "*.%E" "%T"
WCMICONS.dll,59
Переместить все файлы с таким же расширением в другую панель