Форум » GUI » не получается COMPRESS с паролем » Ответить
не получается COMPRESS с паролем
gustow: Или я что-то не так... или что... Банально хочу зазиповать файлы (с паролем): [pre2]Local cPath := CurDrive()+":\"+CurDir()+"\", ; aFiles := { cPath + "PE_LS.DBF", cPath + "PF_LS.DBF" }, ; zip_name := cPath + "blabla.zip" COMPRESS aFiles ; TO zip_name ; BLOCK { || Nil } ; LEVEL 9 ; OVERWRITE ; PASSWORD "12345"[/pre2] Ни шиша! Выходит ZIP без пароля... Хоть как. Хоть так, хоть впрямую: [pre2] hb_ZipFile( zip_name, aFiles, 9, {| cFile, nPos | Nil }, .T., "12345" ) // .T. = OVERWRITE (заменять файлы в архиве)[/pre2] М.б., файлы маленькие (оба в сумме ~1kb)?.. А какая разница?.. Всё одно должен запароливаться...
Ответов - 3
gfilatov: gustow пишет: Или я что-то не так... Попробуй собрать таким батником: call ..\..\..\batch\compile.bat %1 /l hbziparc /l hbmzip /l hbzlib %2 %3 %4 %5 %6 %7 %8 %9 Дело в том, что поддержка паролирования архивов есть только в библиотеке HbMzip
gustow: Ага! Спасибо, Григорий! Буду знать! Кстати, и отмечу (и в переводе Help'а, и в Списке Примеров). Неплохо бы и Янушу Поре в его MiniGUI.CHM пометить (м.б., сообщишь?). Т.е. просто компилирую без ключа /Z в батнике - но с указанием этих библиотек... ...Всё получилось! При попытке просмотра файлов в архиве хочет пароль.
gfilatov: gustow пишет: просто компилирую без ключа /Z в батнике - но с указанием этих библиотек Да, я уже отказался от устаревшего ключа /Z в батнике, поскольку использование этих библиотек эффективнее и к тому же дает меньший размер екзешника.
полная версия страницы