Добавлено: Вс дек 06, 2009 21:59
Жаль, что придется 4 Мб WinRAR-а нести в Total:(Tol!k писал(а):ackep
WinRAR.exe
Портабельности желаю...
Форум поддержки пользователей Total Commander
https://forum.wincmd.ru/
Жаль, что придется 4 Мб WinRAR-а нести в Total:(Tol!k писал(а):ackep
WinRAR.exe
Код: Выделить всё
TOTALCMD#BAR#DATA
%comspec% /c start "" %COMMANDER_PATH%\PLUGINS\arc\Rar.exe
a -m5 -rr5p -t "-ap%O" -- "%O.rar" @%D
%COMMANDER_PATH%\TOTALCMD.EXE,3
У п а к о в а т ь в *.RAR
-1Отдельную тему аналогичного содержания в Общих вопросах удаляю.13. Запрещено создавать одинаковые по смыслу сообщения на разных форумах данной конференции. Если вы сомневаетесь, в правильном ли форуме создали тему, спросите модератора – если будет нужно, он переместит тему в другой форум.
Код: Выделить всё
Dim WSH, Commander_Path, Exe, CDROM, VOLUME_NAME
Set WSH = CreateObject("WScript.Shell")
Commander_Path = WSH.ExpandEnvironmentStrings("%COMMANDER_PATH%")
Exe = (chr(34) & Commander_Path + "\system\win32\ultraiso\ultraiso.exe" & chr(34))
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & "." & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_CDROMDrive")
For Each objItem in colItems
CDROM = objItem.Drive
VOLUME_NAME = objItem.VolumeName
Next
WSH.Run Exe & " -copy " & CDROM & ": -output " & chr(34) & WSH.CurrentDirectory & "\" & VOLUME_NAME & ".iso" & chr(34)
Set WSH = Nothing
WScript.QuitLocKtaR-o-DarK писал(а):Воспроизвести все файлы активной панели в foobar2000Добавить файлы активной панели в список воспроизведения (плейлист) foobar2000 и автоматически начать воспроизведениеКод: Выделить всё
TOTALCMD#BAR#DATA путь\к\foobar2000\foobar2000 /play "%P" путь\к\foobar~1\foobar~1.exe Воспроизвести все файлы панели в foobar2000Код: Выделить всё
TOTALCMD#BAR#DATA путь\к\foobar2000\foobar2000 /add /play "%P" путь\к\foobar~1\foobar~1.exe Добавить файлы активной панели в плейлист и воспроизвести foobar2000
Код: Выделить всё
TOTALCMD#BAR#DATA
путь к foobar2000.exe
/play %P%S
путь к foobar2000.exe
Воспроизвести в фубаре выделенные файлыУ меняackep писал(а):Странно, что я такой кнопки не обнаружил ни тут, ни на ткб.
Код: Выделить всё
TOTALCMD#BAR#DATA
"C:\Program files\foobar2000\foobar2000.exe"
/add /play %P%S
C:\Program files\foobar2000\foobar2000.exe
Добавить файлы в foobar2000 и воспроизвести
-1
Код: Выделить всё
TOTALCMD#BAR#DATA
%windir%\system32\nircmd.exe mutesysvolume 2
%windir%\system32\sndvol32.exe,3
Mute
%windir%\system32\
-1
Код: Выделить всё
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\SOFT\Becky! Internet Mail\B2.exe
%P%S
%COMMANDER_PATH%\SOFT\Becky! Internet Mail\B2.exe,2
О т п р а в и т ь выделенные файлы на E-Mail
0
-1Код: Выделить всё
TOTALCMD#BAR#DATA
cd %COMMANDER_PATH%\SOFT\Winamp\Playlists\
%COMMANDER_PATH%\ICO\audio.ico
-1