powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Распаковка архива
10 сообщений из 10, страница 1 из 1
Распаковка архива
    #35573934
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я запускаю прогу, и Application.GetOpenFilename предлагает мне выбрать открываемый файл в окне проводника. Всё здорово, но он бывает в архиве.
Как распаковать архив из excel программно?
Заранее спасибо!
...
Рейтинг: 0 / 0
Распаковка архива
    #35574029
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: PlanB
> Я запускаю прогу, и Application.GetOpenFilename предлагает мне выбрать открываемый
> файл в окне проводника. Всё здорово, но он бывает в архиве.
> Как распаковать архив из excel программно?

RarИспользование: RAR <команда> -<ключ 1> -<ключ N> <архив> <файлы...>
<@файл-список...> <путь_для_извлечения\>

<Команды>
a Добавить файлы в архив
c Добавить комментарий архива
cf Добавить комментарии файлов
ch Изменить параметры архива
cw Записать комментарий архива в файл
d Удалить файлы из архива
e Извлечь файлы в текущий каталог
f Освежить файлы в архиве
i[пар]=<стр> Найти строку в архивах
k Заблокировать архив
l[t,b] Показать содержимое архива [техинфо,только имена файлов]
m[f] Переместить в архив [только файлы]
p Извлечь файл на устройство stdout
r Исправить повреждённый архив
rc Восстановить пропущенные тома
rn Переименовать файлы в архиве
rr[N] Добавить информацию для восстановления
rv[N] Создать тома для восстановления
s[модуль|-] Преобразовать архив в/из SFX
t Протестировать архив
u Обновить файлы в архиве
v[t,b] Показать подробно содержимое архива [техинфо,только имена]
x Извлечь файлы с полными путями

<Ключи>
- Прервать дальнейший поиск ключей
ac Снять атрибут 'архивный' после архивации или извлечения
ad Добавить имя архива к целевому пути
ag[формат] Добавить к имени архива текущие дату и время
ao Добавить файлы с установленным атрибутом 'архивный'
ap<путь> Указать путь внутри архива
as Синхронизировать содержимое архива
av Добавить электронную подпись (в зарегистрированной версии)
av- Не проверять электронную подпись
c- Не показывать комментарии
cfg- Запретить чтение конфигурации
cl Преобразовывать имена файлов в нижний регистр
cu Преобразовывать имена файлов в верхний регистр
df Удалить файлы после архивации
dh Открывать совместно используемые файлы
ds Не сортировать файлы при добавлении в непрерывный архив
e[+]<атр> Исключить/включить в обработку файлы с указанными атрибутами
ed Не добавлять пустые каталоги
en Не создавать блок 'конец архива'
ep Исключить пути из имён
ep1 Исключить базовый каталог из имён
ep2 Сохранять полные пути файлов
ep3 Сохранять полные пути файлов, включая буквы дисков
f Освежить файлы
fcu[файл] Прочитать комментарий архива из файла в формате Unicode
hp[пароль] Шифровать содержимое файлов и оглавление архива
id[c,d,p,q] Запретить вывод сообщений
ieml[адрес] Отправить архив по e-mail
ierr Отправлять все сообщения на stderr
ilog[имя] Записывать протокол ошибок в файл (в зарегистрированной версии)
inul Запретить вывод всех сообщений
ioff Выключить компьютер по завершении операции
isnd Использовать звуковые сигналы
k Заблокировать архив
kb При извлечении сохранять на диске повреждённые файлы
m<0..5> Метод сжатия (0-без сжатия...3-обычный...5-максимальный)
mc<параметр> Установить дополнительные параметры архивации
md<размер> Размер словаря, в Кб (64,128,256,512,1024,2048,4096 или A..G)
ms[расш;расш] Указать расширения файлов для архивирования без сжатия
mt<потоки> Установить число потоков
n<файл> Включить в обработку только указанный файл
n@ Прочитать имена файлов для включения в обработку с stdin
n@<список> Включить в обработку файлы, указанные в файле-списке
o+ Перезаписывать существующие файлы
o- Не перезаписывать существующие файлы
oc Устанавливать атрибут NTFS 'сжатый'
or Переименовывать файлы автоматически
os Сохранять потоки NTFS
ow Сохранять/восстанавливать владельца и группу файла
p[пароль] Указать пароль шифрования архива
p- Не спрашивать пароль
r Рекурсивно с подкаталогами
r0 Рекурсивно с подкаталогами в соответствии с шаблоном
ri<P>[:<S>] Приоритет (0-по умолчанию,1-мин..15-макс) и время простоя (мс)
rr[N] Добавить информацию для восстановления
rv[N] Создать тома для восстановления
s[<N>,v[-],e] Создать непрерывный архив
s- Запретить создание непрерывных архивов
sfx[модуль] Создать SFX-архив
si[имя] Читать данные с устройства стандартного ввода (stdin)
sl<размер> Обрабатывать файлы размером меньше указанного
sm<размер> Обрабатывать файлы размером больше указанного
t Протестировать файлы после архивации
ta<дата> Обрабатывать файлы, изменённые после <даты> (ГГГГММДДЧЧММСС)
tb<дата> Обрабатывать файлы, изменённые до <даты> (ГГГГММДДЧЧММСС)
tk Сохранять исходное время архива
tl Устанавливать время архива по времени новейшего файла
tn<период> Обрабатывать файлы не старее, чем <период> времени
to<период> Обрабатывать файлы более старые, чем <период> времени
ts<m,c,a>[N] Хранить/восстанавливать время изменения,создания,доступа файла
u Обновить файлы
v Создавать архивные тома с автоопределением размера
v<N>[k,b,m,M] Создавать архивные тома размером=<N>*1000 [*1024, *1, ...]
vd Удалять содержимое сменного диска перед созданием тома
ver[n] Управление версиями файла
vn Использовать старую схему именования томов
vp Делать паузу перед каждым следующим томом
w<путь> Использовать указанный каталог для хранения временных файлов
x<файл> Не обрабатывать указанный файл/шаблон
x@ Прочитать имена исключаемых из обработки файлов с stdin
x@<список> Не обрабатывать файлы/шаблоны, указанные в файле-списке
y Автоматически отвечать 'да' на все запросы
z[файл] Прочитать комментарий архива из файла

?

--
С уважением Горбонос Игорь Леонидович

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Распаковка архива
    #35574091
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, попробую!
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Распаковка архива
    #36564070
20 лет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
PlanB,

А как дальше, после того как архив определен ("Application.GetOpenFilename предлагает мне выбрать открываемый файл в окне проводника"), как его список запомнить в Экселе ???
Спасибо
...
Рейтинг: 0 / 0
Распаковка архива
    #36564592
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
20 лет, список чего?
...
Рейтинг: 0 / 0
Распаковка архива
    #36564874
20 лет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
PlanB,

меня интересует программно получить список файлов архива (имя полное, размер), НЕ распаковывая его.
Спасибо
...
Рейтинг: 0 / 0
Распаковка архива
    #36565159
20 лет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
big-duke,

Я знаю, что Вы наверно знаете, помогите,плз !!!
...
Рейтинг: 0 / 0
Распаковка архива
    #36575684
hawkV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Когда то этот пример мне помог, может и вам поможет
...
Рейтинг: 0 / 0
Распаковка архива
    #36580074
20 лет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
hawkV,

Спасибо БОЛЬШОЕ, буду разбираться....
...
Рейтинг: 0 / 0
Распаковка архива
    #36580942
20 лет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
hawkV,

Распаковываю, импортирую в редактор VB Экселя и не могу запустить.
Научите, пожайлуста, как пользоваться "Cls_Zip.cls" и/или "Mod_Declarations.bas"
Спасибо.
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Распаковка архива
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]