Форум программистов, компьютерный форум, киберфорум
Pure Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.91/33: Рейтинг темы: голосов - 33, средняя оценка - 4.91
37 / 37 / 1
Регистрация: 07.09.2010
Сообщений: 752

Как можно программно сунуть файлы в архив

22.10.2011, 14:53. Показов 7403. Ответов 44
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Как можно программно сунуть файлы в архив.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
22.10.2011, 14:53
Ответы с готовыми решениями:

Кто-нибудь знает как можно программно заполнять (создавать) файлы справки Windows
Кто-нибудь знает как можно программно заполнять (создавать) файлы справки Windows. : Желание ж таково: при программировании своих модулей...

Сколько макс. оперативы сюда можно сунуть
Системная плата Asus P5GD2 Deluxe Разъёмы ОЗУ 4 DDR2 DIMM Тип ЦП Intel Celeron D 336, 2800 MHz (21 x 133) Хочу купить 2 планки по 4...

Как программно распаковать архив?
Как без использования программ типа WinRAR и т.д. распаковать архив? Без разницы рар или зип. В инете много информации об этом, но там...

44
37 / 37 / 1
Регистрация: 07.09.2010
Сообщений: 752
29.10.2011, 22:53  [ТС]
Студворк — интернет-сервис помощи студентам
Создаю архив так.
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
  PureZIP_SetArchivePassword(password)
  PureZIP_Archive_Create(path+name+".stl", #APPEND_STATUS_CREATE)
  Get_Count_Files()
 
  ForEach Image()
 
    !mov eax,[_fwrite+2] 
    !push dword[eax] 
    !push [v_fwrite] 
    !pop dword[eax] 
    !pop [v_fwrite] 
    If GetExtensionPart(Image()\Name)="jpg"
      SaveImage(Image()\ID,"nul",#PB_ImagePlugin_JPEG)
    ElseIf GetExtensionPart(Image()\Name)="png"
      SaveImage(Image()\ID,"nul",#PB_ImagePlugin_PNG)
    Else
      SaveImage(Image()\ID,"nul",#PB_ImagePlugin_JPEG)
    EndIf
    !mov eax,[_fwrite+2] 
    !push dword[eax] 
    !push [v_fwrite] 
    !pop dword[eax] 
    !pop [v_fwrite] 
    PureZIP_Archive_CompressMem(Image()\Name, *mem, memsize)
 
 
    
    ReAllocateMemory(*mem, 16) 
    fwrite=@fwritef()
    memsize=0
  Next
  ClearList(Image())
 
  SaveXML(XML, "main.pp")
  PureZIP_Archive_Compress("main.pp", #False)
  DeleteFile("main.pp")
  
  PureZIP_Archive_Close()
Т.к. он закрывается, информация о нем больше не хранится.
Если открыть этот архив через другую прогу, то толку будет 0.
Если через ту же прогу, но если не закрываласЬ, открывается нормально.
Почему так?

Добавлено через 7 минут
Может из-за пароля

Добавлено через 56 секунд
Да. Пароль нужен был. Спасибо за помощь.
0
PB
Просто прогер
1292 / 1079 / 13
Регистрация: 13.03.2009
Сообщений: 2,502
30.10.2011, 00:19
Цитата Сообщение от Le Thaw Посмотреть сообщение
Может из-за пароля
Если архив защищен паролем, то без пароля не извлечь содержимое файлов.

Добавлено через 1 час 7 минут
Цитата Сообщение от Le Thaw Посмотреть сообщение
SaveXML(XML, "main.pp")
PureZIP_Archive_Compress("main.pp", #False)
DeleteFile("main.pp")
Можно использовать пару функций ExportXML() и ExportXMLSize() для того, чтобы не сохранять данные во временный файл.
1
37 / 37 / 1
Регистрация: 07.09.2010
Сообщений: 752
30.10.2011, 02:01  [ТС]
Спасибо.
0
1386 / 842 / 91
Регистрация: 08.02.2017
Сообщений: 3,585
Записей в блоге: 1
27.10.2024, 14:44
Цитата Сообщение от PB Посмотреть сообщение
Библиотека PureZIP судя по всему, является оберткой над "zlib.lib"
Интересно, а что представляют из себя библиотеки в PB они с strcall и можно ли их использовать в VB?
0
Эксперт по электронике
6576 / 3203 / 335
Регистрация: 28.10.2011
Сообщений: 12,495
Записей в блоге: 7
27.10.2024, 21:30
Цитата Сообщение от testuser2 Посмотреть сообщение
что представляют из себя библиотеки в PB
Статические библиотеки.
Использовать в VB вероятно не позволит лицензионное соглашение, но если все равно (как в анекдоте про татар и орду), то можно.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.10.2024, 21:30
Помогаю со студенческими работами здесь

Как программно распаковать архив ZIP
Приветствую всех. :) Возникла необходимость программной распаковки архива zip. Подскажите в каком направлении рыть? Есть такая...

Как можно обойти проверку CRC или как можно распаковать поврежденный архив?
Есть старый архив. Но при попытке достать из него файл выдается сообщение о несовпадении CRC. Как можно обойти проверку CRC или как вообще...

Как программно создать архив, и засунуть туда файл
Всем привет...))) Подскажите пожалуйста как программно создать архив, и засунуть туда файл... За ранее благодарствуй...))) Я только нашел...

Как программно незаметно создать zip/rar архив и отправить на хост?
C++(лучше C++/CLI). Например: моя программа на компьютере с именем пользователя "User01". Она берет файли из нужных мне папок и пакует...

Как добавить файлы в архив?
Здравствуйте! Нужна помощь. Как реализовать добавление в готовый .zip архив файлы с заменой? :read: т.е нужно не создавать новый архив...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
45
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru