| View previous topic :: View next topic |
| Author |
Message |
Batya
Joined: 15 Dec 2004
Posts: 2218
Location: Москва, Россия
|
 (Separately) Posted: Thu Aug 17, 2006 14:23 Post subject: |
 |
|
| KF-121 wrote: | | А каже быть с перемещением самого архива в папку |
Перед WScript.Quit добавь:
| Code: | 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. |
|
| Back to top |
|
 |
KF-121
Joined: 13 Feb 2006
Posts: 90
|
| (Separately) Posted: Thu Aug 17, 2006 14:35 Post subject: |
|
|
Огромное Спасибо!
_________________
Во всем виновато КАКАДУ!
--------------------------------
IIIypuk©KF-121 |
|
| Back to top |
|
|
KF-121
Joined: 13 Feb 2006
Posts: 90
|
| (Separately) Posted: Wed Aug 23, 2006 16:29 Post subject: |
|
|
| Quote: | | WScript.CreateObject("WScript.Shell").SendKeys "{F7}" & Date & "{Enter}" & "{Enter}" |
Если англицкая раскладка стоит, то создается папка например 23.08.06
если руская то 23ю08ю06
А можно расказать по позробнее про параметы %P %N %L и т.д. и вообще какие бывают
_________________
Во всем виновато КАКАДУ!
--------------------------------
IIIypuk©KF-121 |
|
| Back to top |
|
|
CaptainFlint
Joined: 14 Dec 2004
Posts: 6151
Location: Москва
|
| (Separately) Posted: Wed Aug 23, 2006 16:37 Post subject: |
|
|
| KF-121 wrote: | | А можно расказать по позробнее про параметы %P %N %L и т.д. и вообще какие бывают |
Читай справку.
_________________
Почему же, ё-моё, ты нигде не пишешь "ё"? |
|
| Back to top |
|
|
Batya
Joined: 15 Dec 2004
Posts: 2218
Location: Москва, Россия
|
| (Separately) Posted: Wed Aug 23, 2006 17:11 Post subject: |
|
|
| KF-121 wrote: | | Quote: | | WScript.CreateObject("WScript.Shell").SendKeys "{F7}" & Date & "{Enter}" & "{Enter}" |
Если англицкая раскладка стоит, то создается папка например 23.08.06
если руская то 23ю08ю06
|
Это изевстная мелкомягкая проблема SendKeys. |
|
| Back to top |
|
|
keiko
Joined: 16 Sep 2005
Posts: 43
|
| (Separately) Posted: Fri Aug 25, 2006 23:58 Post subject: |
|
|
Очень бы хотелось кнопочку увидеть:
выделяешь несколько папок в одной панели... нажимаешь на ЭТУ кнопочку и у тебя появляются табы на этой же панели соответствующие выделиным папочкам... |
|
| Back to top |
|
|
CaptainFlint
Joined: 14 Dec 2004
Posts: 6151
Location: Москва
|
| (Separately) Posted: Sat Aug 26, 2006 00:08 Post subject: |
|
|
| keiko wrote: | | нажимаешь на ЭТУ кнопочку и у тебя появляются табы на этой же панели соответствующие выделиным папочкам... |
А просто перетащить их на панель заголовков не судьба? 
_________________
Почему же, ё-моё, ты нигде не пишешь "ё"? |
|
| Back to top |
|
|
LocKtaR-o-DarK
Joined: 12 Aug 2005
Posts: 349
Location: Москва
|
| (Separately) Posted: Fri Sep 01, 2006 13:45 Post subject: |
|
|
Решился таки выложить (пущай до кучи будет, может кому и пригодится)
Вызов папки "Мои документы" в проводнике
| Code: | TOTALCMD#BAR#DATA
shell:Personal
mydocs.dll
Мои документы |
_________________
  |
|
| Back to top |
|
|
StrangeRRor
Joined: 15 Jul 2006
Posts: 214
|
| (Separately) Posted: Sat Sep 02, 2006 13:29 Post subject: |
|
|
Кнопка запускает приложение под курсором с приоритетом "НИЗКИЙ":
| Code: | TOTALCMD#BAR#DATA
cmd /c start
/D%p /LOW %n
C:\WINDOWS\system32\shell32.dll,24
Запуск приложения с приоритетом "НИЗКИЙ"
-1 |
|
|
| Back to top |
|
|
funduk
Joined: 16 Aug 2005
Posts: 1513
Location: Санкт-Петербург
|
|
| Back to top |
|
|
aLexx
Joined: 14 Mar 2005
Posts: 442
Location: Новокузнецк
|
| (Separately) Posted: Sun Sep 24, 2006 20:15 Post subject: |
|
|
| LocKtaR-o-DarK wrote: | | Кнопка для сворачивания всех программ. |
Ведь есть же "WIN"+D?
А также "WIN"+"Pause" для вызова "Свойства системы".
"WIN" - это флажок на кнопкемежду Ctrl и Alt. |
|
| Back to top |
|
|
D1P
Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси
|
| (Separately) Posted: Mon Sep 25, 2006 00:26 Post subject: |
|
|
В Windows (начиная с 2000) есть занимательная утилитка cipher.exe. Она предназначена для шифрования файлов в NTFS. однако есть у неё и ещё одна занятная возможность.
Кнопка:
| Code: | TOTALCMD#BAR#DATA
cipher.exe
/W:C:\
C:\WINDOWS\UnGins.exe
Очистить неиспользуемое место на диске C:
-1
|
Диск указываем нужный.
Кнопка может пригодиться для окончательного и безповоротного затирания "удалённых" файлов, которые влёгкую востанавливаются любым анерейсером.
_________________
База знаний о Total Commander
Блог |
|
| Back to top |
|
|
LocKtaR-o-DarK
Joined: 12 Aug 2005
Posts: 349
Location: Москва
|
| (Separately) Posted: Wed Oct 11, 2006 01:27 Post subject: |
|
|
| Paranoik wrote: | Подскажите, как сделать список файлов с дальнейшей дозаписью при выделении объектов под курсором?
И еще. Как сделать, чтобы список файлов создавался в противоположной панели? |
| Code: | TOTALCMD#BAR#DATA
%comspec%
/c type %L>>"c:\filelist.lst"
shell32.dll,225
Список файлов
1
-1 |
| Code: | TOTALCMD#BAR#DATA
%comspec%
/c type %L>>"%T\filelist.lst"
shell32.dll,134
Список файлов в противоположной панели
1
-1 |
Если нужна не дозапись в список, а обновление, то вместо ">>" ставим ">"
Имя файла списка, параметры и значки можно менять по своему усмотрению
_________________
|
|
| Back to top |
|
|
Billy_Bons
Joined: 03 Mar 2006
Posts: 5
|
| (Separately) Posted: Mon Oct 23, 2006 21:36 Post subject: |
|
|
| D1P wrote: | В Windows (начиная с 2000) есть занимательная утилитка cipher.exe. Она предназначена для шифрования файлов в NTFS. однако есть у неё и ещё одна занятная возможность.
|
Предлагаю вариант кнопки:
| Code: | TOTALCMD#BAR#DATA
cipher.exe
/w:%P
%windir%\system32\cleanmgr.exe
Очистить неиспользуемое место на текущем диске
%windir%\system32\
-1
|
Затираться будет свободное место на диске, который открыт в активной панели. |
|
| Back to top |
|
|
Zorroz
Joined: 16 Dec 2004
Posts: 308
Location: Россия, Иркутская обл., г. Ангарск
|
| (Separately) Posted: Thu Nov 09, 2006 17:58 Post subject: |
|
|
Вкл/выкл список исключений(«черный список»)
| Code: |
TOTALCMD#BAR#DATA
cm_SwitchIgnoreList
C:\totalcmd\TOTALCMD.EXE,11
2922 |
_________________
Когда ангелу обрезают крылья, он учится летать на метле... |
|
| Back to top |
|
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
