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: аналог Enter (explorer) для нескольких файлов 
Author Message
Batya



PostPosted: Wed Mar 23, 2005 13:20    Post subject: Reply with quote

alex29
Чё-то я ступил в одном месте, можно проще:
Code:
'Запуск отмеченных в TC файлов зарегистрированным приложением
'В параметрах команды необходимо прописать %L

Set TempFile = CreateObject("Scripting.FileSystemObject").OpenTextFile(WScript.Arguments(0), 1)

Do While Not TempFile.AtEndOfStream
  CreateObject("WScript.Shell").run chr(34) & TempFile.ReadLine & chr(34)
Loop
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group