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: Создание списка выделенных файлов в UTF-8 
Author Message
Tol!k



PostPosted: Thu Apr 23, 2009 17:30    Post subject: Reply with quote

midasinc wrote:
cm_SelectCurrentExtension
Выделить файлы/папки по текущему расширению
Alt-GreyPlus быстрее и место на панели не занимает

Code:
'  Requirements: WSH Helper for TC by Volniy
Dim TCS
Set TCS = CreateObject("TCScript.Helper")
TCS.Pause=100
TCS.SendCommand "cm_SpreadSelection", False
TCS.SendKeystroke "*.mp3 *.ogg *.wma *.aac *.mpc *.ape *.flac"
TCS.SendKeystroke "{ENTER}"
Set TCS = Nothing
WScript.Quit
— выделит все нужные файлы без предварительной установки курсора
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group