Cobblestone-TLT
|
Posted: Sun Feb 02, 2014 23:19 Post subject: |
|
|
Flasher
В предпоследнем варианте, действительно пропустил один "%")
Что касается последнего, поведение такое - пустые папки от запароленного архива удаляются вместе с архивом, нешифрованные архивы распакуются как надо, но и сами архивы не удаляются.
Для полного счасться не хватает того, чтобы сами эти проблеммные архивы не удалялись вместе с пустой папкой, а не проблемные наоборот - удалялись. Возможно я не представляю масштаба сложности поставленной задачи, но на словах все формулируется (по моему сугубо личному мнению разумеется ) предельно просто: если размер папки на выходе = 0 - удалить её и оставить архив, если > 0 - наоборот (оставить папку и удалить архив).
Я не програмист, но что мне подсказывает что вот эта строка:
Code: |
If FSO.GetFolder(BN).Size = 0 Then
FSO.DeleteFolder BN, 1 : FSO.DeleteFile F, 1
|
На "человеческом" языке звучит как:
"если размер папки = 0, то
удалить папку, удалить файл"
Возможно ли переписать проверку условия таким образом, чтобы это звучало так:
"если размер папки = 0, то
удалить папку;
иначе
удалить файл"
Простите, если изъясняюсь по-делитантски, просто я не программист и разбираюсь сейчас во всех этих кодах опираясь на знания, полученные еще в школе на уроках информатики  |
|