powered by simpleCommunicator - 2.0.28     © 2024 Programmizd 02
Map
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Архивные файлы
13 сообщений из 13, страница 1 из 1
Архивные файлы
    #39974392
hum_i
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добрый день!
Скажите пожалуйста можно ли средствами билдера разархивировать полученный файл в нужную папку и потом его открыть. Если да, то подскажите пожалуйста как это можно сделать?
...
Рейтинг: 0 / 0
Архивные файлы
    #39974411
Рыба
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
hum_i, можно посмотреть пример
https://www.topwizprogramming.com/freecode_zlibwapi.html
...
Рейтинг: 0 / 0
Архивные файлы
    #39974743
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если нет прямо вот жесткой необходимости, то проще всего использовать командную строку формируемую из приложения
...
Рейтинг: 0 / 0
Архивные файлы
    #39975816
hum_i
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
spas2001
Если нет прямо вот жесткой необходимости, то проще всего использовать командную строку формируемую из приложения

А можете подсказать как это сделать через командную строку?
...
Рейтинг: 0 / 0
Архивные файлы
    #39975839
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Формируете строку вида C:\директория\7z.exe e c:\директория архива\имя архива.zip -y -oc:\куда распаковывать имя_файла.xls
Запускаете командой RUN
Если нужен синхронный процесс, то где-то здесь лежал код синхронного выполнения команды
...
Рейтинг: 0 / 0
Архивные файлы
    #39977111
Фотография Riska
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
OleObject ole_shell
integer  li_return

ole_shell = CREATE OleObject
li_return = ole_shell.ConnectToNewObject( "WScript.Shell" )

ole_shell.Run('C:\директория\7z.exe e c:\директория архива\имя архива.zip -y -oc:\куда распаковывать имя_файла.xls', 0, TRUE)

IF IsValid(ole_shell) THEN Destroy ole_shell
...
Рейтинг: 0 / 0
Архивные файлы
    #39977177
Фотография Филипп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Riska
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
OleObject ole_shell
integer  li_return

ole_shell = CREATE OleObject
li_return = ole_shell.ConnectToNewObject( "WScript.Shell" )

ole_shell.Run('C:\директория\7z.exe e c:\директория архива\имя архива.zip -y -oc:\куда распаковывать имя_файла.xls', 0, TRUE)

IF IsValid(ole_shell) THEN Destroy ole_shell



Довольно странно пытыться делать IsValid после того как пытыться делать Run
...
Рейтинг: 0 / 0
Архивные файлы
    #39977361
osxl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Филипп
Riska
Код: sql
1.
IF IsValid(ole_shell) THEN Destroy ole_shell


Довольно странно пытаться делать IsValid после того как пытаться делать Run

Я так понимаю что ole_shell.Run() запускает в отдельном процессе? И в данном случае если файл не успеет распаковаться следующая строка IF IsValid(ole_shell) THEN Destroy ole_shell сразу прибьет запущенный процесс?
...
Рейтинг: 0 / 0
Архивные файлы
    #39977408
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
osxl, не прибьет
Подождет пока отработает
Я еще добавляю код для проверки, что файл существует
...
Рейтинг: 0 / 0
Архивные файлы
    #39982772
hum_i
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Riska
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
OleObject ole_shell
integer  li_return

ole_shell = CREATE OleObject
li_return = ole_shell.ConnectToNewObject( "WScript.Shell" )

ole_shell.Run('C:\директория\7z.exe e c:\директория архива\имя архива.zip -y -oc:\куда распаковывать имя_файла.xls', 0, TRUE)

IF IsValid(ole_shell) THEN Destroy ole_shell



-oc:\куда распаковывать имя_файла.xls А зачем при указании куда распаковать указывать имя файла? мне ведь просто в папку нужно распаковать

т.е. я так это представляю -oc:\C:\FOLDER1\
...
Рейтинг: 0 / 0
Архивные файлы
    #39982789
hum_i
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Riska
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
OleObject ole_shell
integer  li_return

ole_shell = CREATE OleObject
li_return = ole_shell.ConnectToNewObject( "WScript.Shell" )

ole_shell.Run('C:\директория\7z.exe e c:\директория архива\имя архива.zip -y -oc:\куда распаковывать имя_файла.xls', 0, TRUE)

IF IsValid(ole_shell) THEN Destroy ole_shell



что то не срастается
не распаковывает
ole_shell.Run( 'C:\prog\7z.exe e C:\FOLDER1\archive1.zip -y -oC:\FOLDER1\', 0, TRUE )
...
Рейтинг: 0 / 0
Архивные файлы
    #39983683
hum_i
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В общем то получилось с распаковкой. Спасибо за помощь
Не подскажите какой применить параметр при распаковке, чтобы если файлы с таким название есть в исходной папке, эти файлы бы обновлялись автоматически?
...
Рейтинг: 0 / 0
Архивные файлы
    #39983715
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Там указан ключ -y - Да на все вопросы, должно перекрывать
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Архивные файлы
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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