Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Перемещение\копирование файлов без подтверждения
Goto page 1, 2  Next
 
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы printer-friendly view
View previous topic :: View next topic  
Author Message
Lnk



Joined: 13 May 2023
Posts: 65

Post (Separately) Posted: Sat May 13, 2023 14:58    Post subject: Перемещение\копирование файлов без подтверждения Reply with quote

Вопрос такой - создал кнопку на панели, в команде прописал cm_SelectCurrentExtension,cm_RenMov ( то есть она сперва выделяет все файлы с выбранным расширением, а потом нажимает Ф6) при нажатии этой кнопки выводится запрос перместить? можно ли сделать так что он без запроса перемещал?
ну то етсь как будто нажмешь Ф6 и все файлы просто переместятся в другую панель без доп нажатий.
надеюсь понятно написал вопрос..можно ли такое?
Back to top
View user's profile Send private message
LonerD



Joined: 04 Jan 2011
Posts: 1168
Location: Донецк

Post (Separately) Posted: Sat May 13, 2023 15:24    Post subject: Reply with quote

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

Code:
; 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
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;

_________________
Win11 x64 Eng | TC DreamLair eternal pre-α


Last edited by LonerD on Sat May 13, 2023 23:59; edited 3 times in total
Back to top
View user's profile Send private message
Lnk



Joined: 13 May 2023
Posts: 65

Post (Separately) Posted: Sat May 13, 2023 15:32    Post subject: Reply with quote

LonerD wrote:
Я себе таким скриптом на AutoHotkeyV1 сделал:
...


хм автохоткея нету у мя. незнакомая штука.. но спасибо.
мне б на крайняк скриптом бы тогда хотя бы.. конеш через простую кнопку лучше было б..
Back to top
View user's profile Send private message
Monarch-LFV



Joined: 22 Jul 2019
Posts: 229

Post (Separately) Posted: Sat May 13, 2023 15:51    Post subject: Reply with quote

Lnk
Создайте файл *.bat с текстом:
Code:
:: Параметры запуска %P%N %T
move %~dp1*%~x1 %2

Закинуть его на панель кнопок и в параметрах, соответственно прописать, что написано.
Back to top
View user's profile Send private message
Lnk



Joined: 13 May 2023
Posts: 65

Post (Separately) Posted: Sat May 13, 2023 15:58    Post subject: Reply with quote

Monarch-LFV wrote:
Lnk
Создайте файл *.bat с текстом:
Code:
:: Параметры запуска %P%N %T
move %~dp1*%~x1 %2

Закинуть его на панель кнопок и в параметрах, соответственно прописать, что написано.

работает шикарно! спасибо огромное Monarch-LFV !
теперь многократно быстрей будет мне работать с файлами)

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

Monarch-LFV но есть одна странность, если
в заголовке папки есть пробел то уже не работает.
а с каталогами одинаковыми названиями но с цифрами- вобще странно, к примеру если есть
Inf
Inf 1
то даже при открытой папке Inf 1 перенесет в папку Inf Shocked
немного неудобно, не знай почему так, но ничего страшного, прост буду учитывать такое
Back to top
View user's profile Send private message
Monarch-LFV



Joined: 22 Jul 2019
Posts: 229

Post (Separately) Posted: Sat May 13, 2023 16:41    Post subject: Reply with quote

Lnk
Да, для пробелов не хватает кавычек, нужно вот так:
Code:
:: Параметры запуска %P%N "%T"
move "%~dp1*%~x1" %2

Обратите внимание на кавычки в параметрах.
Back to top
View user's profile Send private message
Lnk



Joined: 13 May 2023
Posts: 65

Post (Separately) Posted: Sat May 13, 2023 16:55    Post subject: Reply with quote

Monarch-LFV wrote:
Lnk
Да, для пробелов не хватает кавычек, нужно вот так:
Code:
:: Параметры запуска %P%N "%T"
move "%~dp1*%~x1" %2

Обратите внимание на кавычки в параметрах.

да, добавил ковычки лучше стало, но не во все папки перемещает.. хммм..
например в такого вида папку не хочет c:\Users\Администратор\Downloads\Compressed\
жаль не видно что пишет, автозакрывает же батник
Back to top
View user's profile Send private message
imig73



Joined: 18 Jun 2013
Posts: 280
Location: г. Иркутск

Post (Separately) Posted: Sat May 13, 2023 17:04    Post subject: Reply with quote

Lnk
Путь к батнику:
%comspec% /k D:\move-x.cmd
Back to top
View user's profile Send private message
Monarch-LFV



Joined: 22 Jul 2019
Posts: 229

Post (Separately) Posted: Sat May 13, 2023 17:04    Post subject: Reply with quote

В конце батника пропишите команду pause.
И посмотрите что пишет.
Back to top
View user's profile Send private message
Lnk



Joined: 13 May 2023
Posts: 65

Post (Separately) Posted: Sat May 13, 2023 17:10    Post subject: Reply with quote

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

ошибка в синтаксисе команды пишет..

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

imig73 wrote:
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

ето не пригодится как нибудь? но тут я так понял каталог еще создается


Last edited by Lnk on Sat May 13, 2023 17:15; edited 1 time in total
Back to top
View user's profile Send private message
Monarch-LFV



Joined: 22 Jul 2019
Posts: 229

Post (Separately) Posted: Sat May 13, 2023 17:14    Post subject: Reply with quote

А конкретнее? Там кроме этого еще есть текст вообще-то.
Back to top
View user's profile Send private message
Lnk



Joined: 13 May 2023
Posts: 65

Post (Separately) Posted: Sat May 13, 2023 17:20    Post subject: Reply with quote

Monarch-LFV wrote:
А конкретнее? Там кроме этого еще есть текст вообще-то.

С\move C\files\for copy!\*.pdf "C:\Users\Администратор\Downloads\pics\"
ошибка в синтаксисе команды

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

причем интерсно елси напр из c:\IDL\ в c:\files\dl from brow\ то норм перемещает. вот обратно уже нет, пишет что ошибка
Back to top
View user's profile Send private message
Monarch-LFV



Joined: 22 Jul 2019
Posts: 229

Post (Separately) Posted: Sat May 13, 2023 17:25    Post subject: Reply with quote

Lnk
Вы внимательно прочитали мой второй код? Там кавычки не упустили в самом батнике? Перепроверьте.
PS. Ох и достанется вам от модератора за оформление сообщений, ждите... На форуме правила русского языка никто не отменял! Будете писать в таком духе, ждите бан.
Back to top
View user's profile Send private message
Lnk



Joined: 13 May 2023
Posts: 65

Post (Separately) Posted: Sat May 13, 2023 17:34    Post subject: Reply with quote

Monarch-LFV wrote:
Lnk
Вы внимательно прочитали мой второй код? Там кавычки не упустили в самом батнике? Перепроверьте.
PS. Ох и достанется вам от модератора за оформление сообщений, ждите... На форуме правила русского языка никто не отменял! Будете писать в таком духе, ждите бан.

айяй кажется реально где то я ошибся. сейчас вобще удалил батник старый и новый создал. и вроде все работает. ДИКО ИЗВИНЯЮСЬ!(((
спасибо большое!!!

PS насчет правил не знаю, я ж на форум пришел а не в клуб русского... пишу по теме просто. если что не так - сорри.
Back to top
View user's profile Send private message
Monarch-LFV



Joined: 22 Jul 2019
Posts: 229

Post (Separately) Posted: Sat May 13, 2023 17:49    Post subject: Reply with quote

Lnk
Еще вариант без батника, сразу кнопка:
Code:
TOTALCMD#BAR#DATA
cmd /c
move "*.%E" "%T"
WCMICONS.dll,59
Переместить все файлы с таким же расширением в другую панель
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы All times are GMT + 4 Hours
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group