Обмен кнопками

[Batya]

А каже быть с перемещением самого архива в папку

Перед WScript.Quit добавь:

Код: Выделить всё

If WScript.Arguments.Count > 0 Then
  Dim FSO, FileName, oFile, PathNew
  Set FSO   = CreateObject("Scripting.FileSystemObject")
  FileName  = WScript.Arguments(0)
  Set oFile = FSO.GetFile(FileName)
  PathNew   = oFile.ParentFolder & "" & FSO.GetBaseName(FileName) & "\Old"
  If Not FSO.FolderExists(PathNew) Then
    FSO.CreateFolder(PathNew)
  End If
  oFile.Move(PathNew)
  Set oFile = Nothing
  Set FSO   = Nothing
End If

Кнопке (команде) надо передать параметр %P%N.

[KF-121]

Огромное Спасибо!

[KF-121]

WScript.CreateObject("WScript.Shell").SendKeys "{F7}" & Date & "{Enter}" & "{Enter}"

Если англицкая раскладка стоит, то создается папка например 23.08.06
если руская то 23ю08ю06


А можно расказать по позробнее про параметы %P %N %L и т.д. и вообще какие бывают

[CaptainFlint]

А можно расказать по позробнее про параметы %P %N %L и т.д. и вообще какие бывают

Читай справку.

[Batya]

WScript.CreateObject("WScript.Shell").SendKeys "{F7}" & Date & "{Enter}" & "{Enter}"

Если англицкая раскладка стоит, то создается папка например 23.08.06
если руская то 23ю08ю06

Это изевстная мелкомягкая проблема SendKeys.

[keiko]

Очень бы хотелось кнопочку увидеть:
выделяешь несколько папок в одной панели... нажимаешь на ЭТУ кнопочку и у тебя появляются табы на этой же панели соответствующие выделиным папочкам...

[CaptainFlint]

нажимаешь на ЭТУ кнопочку и у тебя появляются табы на этой же панели соответствующие выделиным папочкам...

А просто перетащить их на панель заголовков не судьба?

[LocKtaR-o-DarK]

Решился таки выложить (пущай до кучи будет, может кому и пригодится)

Вызов папки "Мои документы" в проводнике

Код: Выделить всё

TOTALCMD#BAR#DATA
shell:Personal

mydocs.dll
Мои документы

[StrangeRRor]

Кнопка запускает приложение под курсором с приоритетом "НИЗКИЙ":

Код: Выделить всё

TOTALCMD#BAR#DATA
cmd /c start
/D%p /LOW %n
C:\WINDOWS\system32\shell32.dll,24
Запуск приложения с приоритетом "НИЗКИЙ"


-1

[funduk]

Кнопка запускает приложение под курсором с приоритетом "НИЗКИЙ":

http://forum.wincmd.ru/viewtopic.php?p=15388#15388

[aLexx]

Кнопка для сворачивания всех программ.

Ведь есть же "WIN"+D?
А также "WIN"+"Pause" для вызова "Свойства системы".
"WIN" - это флажок на кнопкемежду Ctrl и Alt.

[D1P]

В Windows (начиная с 2000) есть занимательная утилитка cipher.exe. Она предназначена для шифрования файлов в NTFS. однако есть у неё и ещё одна занятная возможность.
Кнопка:

Код: Выделить всё

TOTALCMD#BAR#DATA
cipher.exe
/W:C:\
C:\WINDOWS\UnGins.exe
Очистить неиспользуемое место на диске C:


-1

Диск указываем нужный.

Кнопка может пригодиться для окончательного и безповоротного затирания "удалённых" файлов, которые влёгкую востанавливаются любым анерейсером.

[LocKtaR-o-DarK]

Подскажите, как сделать список файлов с дальнейшей дозаписью при выделении объектов под курсором?
И еще. Как сделать, чтобы список файлов создавался в противоположной панели?

Код: Выделить всё

TOTALCMD#BAR#DATA
%comspec%
/c type %L>>"c:\filelist.lst"
shell32.dll,225
Список файлов

1
-1

Код: Выделить всё

TOTALCMD#BAR#DATA
%comspec%
/c type %L>>"%T\filelist.lst"
shell32.dll,134
Список файлов в противоположной панели

1
-1

Если нужна не дозапись в список, а обновление, то вместо ">>" ставим ">"

Имя файла списка, параметры и значки можно менять по своему усмотрению

[Billy_Bons]

В Windows (начиная с 2000) есть занимательная утилитка cipher.exe. Она предназначена для шифрования файлов в NTFS. однако есть у неё и ещё одна занятная возможность.

Предлагаю вариант кнопки:

Код: Выделить всё

TOTALCMD#BAR#DATA
cipher.exe
/w:%P
%windir%\system32\cleanmgr.exe
Очистить неиспользуемое место на текущем диске
%windir%\system32\

-1

Затираться будет свободное место на диске, который открыт в активной панели.

[Zorroz]

Вкл/выкл список исключений(«черный список»)

Код: Выделить всё

TOTALCMD#BAR#DATA
cm_SwitchIgnoreList

C:\totalcmd\TOTALCMD.EXE,11



2922