| Автор | Сообщение |
|
|
| |
Пост N: 8047
Зарегистрирован: 17.05.05
|
|
Отправлено: 13.03.25 19:37. Заголовок: unzip + mem: дружат ?
Хотел скопировать zip архив в память MEM: , там его развернуть , достав базы , базы открыть , обработать и затем всё это дело там завалить , но лыжы что то не едут. Начал делать примерно так и не закончил , так как содержимое архива получить не удалось. local aExtract REQUEST DBFCDX rddSetDefault( "DBFCDX" ) REQUEST HB_MEMIO if hb_vfcopyfile(hb_dirbase()+"otd_33.zip","mem:otd_33.zip")==0 if hb_vfexists("mem:otd_33.zip") aExtract := hb_GetFilesInZip( "mem:otd_33.zip") ? hb_valtoexp(aExtract) // пустой масcив endif hb_vfErase( "mem:otd_33.zip" ) endif return nil Вопрос такой , что то в плане этой задачи сделать можно или реализация hbmzip и hbziparc этого не позволит ?
|
 |

|
|
Ответов - 25
, стр:
1
2
All
[только новые]
|
|
|
|
| |
Пост N: 8063
Зарегистрирован: 17.05.05
|
|
Отправлено: 21.03.25 19:29. Заголовок: SergKis пишет: Как ..
SergKis пишет: | цитата: | | Как помню, dbdrop("mem:aktemp",,"DBFCDX") удалит dbf, cdx |
| неа я на это уже нарывался
|
 |

|
|
|
| постоянный участник
|
Пост N: 4698
Зарегистрирован: 17.02.12
|
|
Отправлено: 21.03.25 19:30. Заголовок: Dima :sm36: не зна..
Dima не знал и писал сам 
|
 |

|
|
|
| |
Пост N: 8064
Зарегистрирован: 17.05.05
|
|
Отправлено: 21.03.25 19:38. Заголовок: SergKis пишет: не з..
|
 |

|
|
|
| постоянный участник
|
Пост N: 4699
Зарегистрирован: 17.02.12
|
|
Отправлено: 21.03.25 19:43. Заголовок: Dima пишет я на это ..
Dima пишет Похоже ты больше прав. У меня fpt в mem: нет, только dbf и cdx и в коде использую только dbdrop("mem:aktemp",,"DBFCDX") и этого хватает, но посмотрел код и понимаю, что dbDrop() использовать нет большого смысла, лучше сразу цикл или с for ... #xcommand ... сделать, что для mem:, что для обычной базы
|
 |

|
|
|
| |
Пост N: 8065
Зарегистрирован: 17.05.05
|
|
Отправлено: 22.03.25 09:07. Заголовок: SergKis пишет: dbdr..
SergKis пишет: | цитата: | | dbdrop("mem:aktemp",,"DBFCDX") и этого хватает |
| Да ты прав , удаляет всё (проверил) , в прежних версиях Harbour это было не так , вероятно исправили по тихому.
|
 |

|
|
Ответов - 25
, стр:
1
2
All
[только новые]
|
|