Как извлечь файлы из архива, не прибегая к копированию его на диск - VB
Формулировка задачи:
Сейчас делаю упаковщик
который создаёт распаковщик с "пришитым архивом", по такой упрощенной схеме:
<Стартовый EXE><Архив ZIP>
В архиве:
- Основной EXE (основная программа)
- Дополнительные файлы OCX // DLL // INI // ICO.. и тп
- производит копирование архива на диск
- производит излечение Основного
- Проверяет регистрацию и наличия библиотек (извлекает регестрирует)
- Удаляет временно скопированный архив
- Запускает основную программу
- Можно ли извлеч файлы из архива, не прибегая к копированию его на диск ?
- Как программно проверить наличие регестрацию DLL//OCX и дату создания ?
- Как зарегестрировать программно, не прибегая к батнику ?
- Как узнать что основная программа запустилась ?
- Как узнать что основная программа завершилась ?
- Можно ли всё это сделать ещё проще ?
Решение задачи: «Как извлечь файлы из архива, не прибегая к копированию его на диск»
textual
Листинг программы
Dim notepadID As Integer
' Activate a running Notepad process.
AppActivate("Untitled - Notepad")
' AppActivate can also use the return value of the Shell function.
' Shell runs a new instance of Notepad.
notepadID = Shell("C:\WINNT\NOTEPAD.EXE", AppWinStyle.NormalFocus)
' Activate the new instance of Notepad.
AppActivate(notepadID)