| View previous topic :: View next topic |
| Author |
Message |
alex29
Joined: 06 Jan 2005
Posts: 24
|
 (Separately) Posted: Mon Mar 21, 2005 12:08 Post subject: аналог Enter (explorer) для нескольких файлов |
 |
|
Если в эксплорере выделить несколько файлов и нажать enter, запускаются все. Например, несколько программ, несколько документов ворда, несколько песенок загружаются в винамп.
Как такое сделать в totalcmd? |
|
| Back to top |
|
 |
Ergo
Site Admin
Joined: 14 Dec 2004
Posts: 430
|
|
| Back to top |
|
|
alex29
Joined: 06 Jan 2005
Posts: 24
|
| (Separately) Posted: Tue Mar 22, 2005 00:13 Post subject: |
|
|
ChoiceEditor - не очень похоже на то, что мне надо...
Я же не могу внести в список все типы файлов, которые мне когда-либо надо будет открывать. Кроме того, редактировать по F4 мне тоже бывает нужно...
Вопрос открыт ;-) |
|
| Back to top |
|
|
Sheridan
Joined: 01 Mar 2005
Posts: 129
Location: Пятигорск
|
| (Separately) Posted: Tue Mar 22, 2005 08:28 Post subject: |
|
|
1. Вноси по необходимости.
2. Цепляй именно тот редактор которым тебе более всего удобно. |
|
| Back to top |
|
|
Batya
Joined: 15 Dec 2004
Posts: 2218
Location: Москва, Россия
|
| (Separately) Posted: Tue Mar 22, 2005 14:25 Post subject: |
|
|
Сделай файлик *.vbs с кодом:
| Code: | Set FSO = CreateObject("Scripting.FileSystemObject")
Set TempFile = FSO.OpenTextFile(WScript.Arguments(0), 1)
Set WS = CreateObject("WScript.Shell")
Do While Not TempFile.AtEndOfStream
WS.run chr(34) & FSO.GetFile(TempFile.ReadLine) & chr(34)
Loop |
Повесь его на кнопку или в меню "Пуск", в параметрах пропиши %L. |
|
| Back to top |
|
|
alex29
Joined: 06 Jan 2005
Posts: 24
|
| (Separately) Posted: Wed Mar 23, 2005 01:19 Post subject: |
|
|
That's it!
Thanks. |
|
| Back to top |
|
|
Batya
Joined: 15 Dec 2004
Posts: 2218
Location: Москва, Россия
|
| (Separately) Posted: Wed Mar 23, 2005 13:20 Post subject: |
|
|
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 |
|
|
| Back to top |
|
|
Pusher
Joined: 21 Mar 2005
Posts: 16
Location: Ялта
|
| (Separately) Posted: Fri Apr 01, 2005 14:08 Post subject: |
|
|
Ребята, нафига мутить чтото если есть стандартная функция?
Выделяете несколько файлов и выбираете в контекстном меню их выделенный пункт!!! Работает на все 100%!!! Не надо даже тянуться к шорткату или к тулбару.
Можно даже без мышки сделать! Контестное меню открывается специальной кнопкой, или же шифт+ф10, в нём нужно всего лишь нажать вниз и ентер. Пашет!!! |
|
| Back to top |
|
|
Bomm
Joined: 15 Jan 2005
Posts: 245
Location: Москва
|
| (Separately) Posted: Fri Apr 01, 2005 15:06 Post subject: |
|
|
| Quote: | | Ребята, нафига мутить чтото если есть стандартная функция? |
Ух ты 
А я бы и не догадался... Век живи, такого узнаешь  |
|
| Back to top |
|
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
