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: Удаление файлов из корзины 
Author Message
Skif_off



PostPosted: Sun Jul 22, 2018 19:01    Post subject: Reply with quote

Вау. Если вдруг у кого обострение мнительности, что-то, куда-то и откуда-то тянет, то лучше проигнорируйте этот пост.
 Hidden text


Сегодня бодался с одним скриптом для AkelPad, он меня забодал, но внезапно попытался вспомнить, можно ли использовать в VBScript вызовы WinAPI и функции прочих библиотек из коробки... Не вспомнил, но пришла идея, за которую буду требовать отдельную палату в Кащенко, - очистить корзину с помощью... AkelPad
Code:
%COMMANDER_PATH%\Utils\AkelPad\AkelPad.exe /NewInstance /MainClass("AkelPad4 - %d") /Show(0) /Call("Scripts::Main", 7, `AkelPad.SystemFunction().Call("shell32::SHEmptyRecycleBinW", 0, "", 0x07)`) /Quit

Выбрано удаление без подтверждения, без прогресса и без звука, можно изменить, заменив 0x07 на иную сумму флагов:
SHERB_NOCONFIRMATION = 0x01
SHERB_NOPROGRESSUI = 0x02
SHERB_NOSOUND = 0x04
Должно работать на Win2000 и выше.

Как можно заметить, на всякий случай в /MainClass добавлена переменная %d, поэтому если помещать все параметры в поле параметров ТС, то требуется удвоить символ процента - %%d.
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group