Гость
Войти | Профиль | Очистить
Действия ...
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Архивные файлы / 13 сообщений из 13, страница 1 из 1
30.06.2020, 08:39
    #39974392
hum_i
hum_i
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
Добрый день!
Скажите пожалуйста можно ли средствами билдера разархивировать полученный файл в нужную папку и потом его открыть. Если да, то подскажите пожалуйста как это можно сделать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2020, 09:14
    #39974411
Рыба
Рыба
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
hum_i, можно посмотреть пример
https://www.topwizprogramming.com/freecode_zlibwapi.html
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2020, 18:32
    #39974743
spas2001
spas2001
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
Если нет прямо вот жесткой необходимости, то проще всего использовать командную строку формируемую из приложения
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2020, 10:39
    #39975816
hum_i
hum_i
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
spas2001
Если нет прямо вот жесткой необходимости, то проще всего использовать командную строку формируемую из приложения

А можете подсказать как это сделать через командную строку?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2020, 11:28
    #39975839
spas2001
spas2001
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
Формируете строку вида C:\директория\7z.exe e c:\директория архива\имя архива.zip -y -oc:\куда распаковывать имя_файла.xls
Запускаете командой RUN
Если нужен синхронный процесс, то где-то здесь лежал код синхронного выполнения команды
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.07.2020, 14:38
    #39977111
Riska
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
| Ответить | Цитировать | Написать  
07.07.2020, 17:38
    #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
| Ответить | Цитировать | Написать  
08.07.2020, 12:17
    #39977361
osxl
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
| Ответить | Цитировать | Написать  
08.07.2020, 13:35
    #39977408
spas2001
spas2001
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
osxl, не прибьет
Подождет пока отработает
Я еще добавляю код для проверки, что файл существует
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2020, 15:44
    #39982772
hum_i
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
| Ответить | Цитировать | Написать  
22.07.2020, 16:05
    #39982789
hum_i
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
| Ответить | Цитировать | Написать  
24.07.2020, 15:09
    #39983683
hum_i
hum_i
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
В общем то получилось с распаковкой. Спасибо за помощь
Не подскажите какой применить параметр при распаковке, чтобы если файлы с таким название есть в исходной папке, эти файлы бы обновлялись автоматически?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.07.2020, 15:48
    #39983715
spas2001
spas2001
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Архивные файлы
Там указан ключ -y - Да на все вопросы, должно перекрывать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Архивные файлы / 13 сообщений из 13, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 373ms
Закрыть
start [/forum/topic.php?fid=15&mobile=1&tid=1335015]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 29ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 250ms
total:  373ms
x
x
Закрыть


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