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
Cobblestone-TLT



PostPosted: Sun Feb 02, 2014 23:19    Post subject: Reply with quote

Flasher
В предпоследнем варианте, действительно пропустил один "%")
Что касается последнего, поведение такое - пустые папки от запароленного архива удаляются вместе с архивом, нешифрованные архивы распакуются как надо, но и сами архивы не удаляются.

Для полного счасться не хватает того, чтобы сами эти проблеммные архивы не удалялись вместе с пустой папкой, а не проблемные наоборот - удалялись. Возможно я не представляю масштаба сложности поставленной задачи, но на словах все формулируется (по моему сугубо личному мнению разумеется Smile ) предельно просто: если размер папки на выходе = 0 - удалить её и оставить архив, если > 0 - наоборот (оставить папку и удалить архив).

Я не програмист, но что мне подсказывает что вот эта строка:
Code:

If FSO.GetFolder(BN).Size = 0 Then
       FSO.DeleteFolder BN, 1 : FSO.DeleteFile F, 1

На "человеческом" языке звучит как:
"если размер папки = 0, то
удалить папку, удалить файл"
Возможно ли переписать проверку условия таким образом, чтобы это звучало так:
"если размер папки = 0, то
удалить папку;
иначе
удалить файл"

Простите, если изъясняюсь по-делитантски, просто я не программист и разбираюсь сейчас во всех этих кодах опираясь на знания, полученные еще в школе на уроках информатики Smile
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group