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 

Single Post  Topic: Автоматическое создание папок 
Author Message
Вахмурка



PostPosted: Sat Oct 01, 2011 19:13    Post subject: Reply with quote

Какую ссылку?! Во избежание флуда привожу сообщение полностью:
Quote:
Скрипт:
Code:
args Sel, TPath, From
local F

if(not From) do
   x9++
else
   x9 = From
   quit
endif

for each word F in Sel
   file.move(F, TPath ++ x9)
endfor
Образы кнопок:
Code:
TOTALCMD#BAR#DATA
e:\Utils\PowerPro\powerpro.exe
runfile.test("%P%S", "%T", 12)
E:\Storage\Graphics\Icons\Visual Basic\BULLSEYE.ICO
Начальный запуск


-1
Code:
TOTALCMD#BAR#DATA
e:\Utils\PowerPro\powerpro.exe
runfile.test("%P%S", "%T")
E:\Storage\Graphics\Icons\Visual Basic\BULLSEYE.ICO
Перемещение


-1
В первой кнопке третьим параметром задаешь стартовый номер директории. Положение курсора произвольно, выделение - тоже. Затем жмешь только вторую кнопку, предварительно выделив нужные файлы. Директории создаются заранее скриптом, который я выслал тебе вчера.
На всякий случай. Я не несу ответственности за пропажу файлов, за... да вообще ни за что.
Настоятельно рекомендую потренироваться на кошках - создать полигон с ненужными файлами и погонять скрипт.
Желаю успеха.
Накануне я выслал ему это.
_________________
Сайт PowerPro+Total Commander
Скрипты PowerPro для Total Commander
* * *
«Не усматривайте злого умысла в том, что вполне объяснимо глупостью» (Р. Хэнлон)
View user's profile Send private message Send e-mail Visit poster's website


Powered by phpBB © 2001, 2005 phpBB Group