Как извлечь файлы из архива, не прибегая к копированию его на диск - VB

Узнай цену своей работы

Формулировка задачи:

Сейчас делаю упаковщик который создаёт распаковщик с "пришитым архивом", по такой упрощенной схеме: <Стартовый EXE><Архив ZIP> В архиве:
  • Основной EXE (основная программа)
  • Дополнительные файлы OCX // DLL // INI // ICO.. и тп
Стартовый:
  • производит копирование архива на диск
  • производит излечение Основного
  • Проверяет регистрацию и наличия библиотек (извлекает регестрирует)
  • Удаляет временно скопированный архив
  • Запускает основную программу
Вопросы:
  • Можно ли извлеч файлы из архива, не прибегая к копированию его на диск ?
  • Как программно проверить наличие регестрацию DLL//OCX и дату создания ?
  • Как зарегестрировать программно, не прибегая к батнику ?
  • Как узнать что основная программа запустилась ?
  • Как узнать что основная программа завершилась ?
  • Можно ли всё это сделать ещё проще ?

Решение задачи: «Как извлечь файлы из архива, не прибегая к копированию его на диск»

textual
Листинг программы
  1. Dim notepadID As Integer
  2. ' Activate a running Notepad process.
  3. AppActivate("Untitled - Notepad")
  4. ' AppActivate can also use the return value of the Shell function.
  5. ' Shell runs a new instance of Notepad.
  6. notepadID = Shell("C:\WINNT\NOTEPAD.EXE", AppWinStyle.NormalFocus)
  7. ' Activate the new instance of Notepad.  
  8. AppActivate(notepadID)

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 3.667 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы