Вниз
Скачать: CL | DM;

Сжать файлы и сохранить в BLOB   Найти похожие ветки 

← →
Ling ©   (2005-09-30 17:15) [0]

Здравствуйте мастера.

Нужна помощь.
MySQL 3.23
работаю через Zeos; C BLOB полями вообще не работал, и не знаю, как мне составить запрос, что-бы сохранить в нём инфу.

Представим себе базу
индекс | путь\имена файлов.расш | размеры файлов | BLOB

Вопрос: как мне собрать все файлы из директории (это я могу 8) ), обьеденить их в один, заархивировать, и сохранить полученный архив в BLOB поле? И естественно, как выполнить обратную операцию.


← →
Виталий Панасенко   (2005-09-30 17:44) [1]


> Вопрос: как мне собрать все файлы из директории (это я могу
> 8) ), обьеденить их в один, заархивировать, и сохранить
> полученный архив в BLOB поле? И естественно, как выполнить
> обратную операцию.

А деньги можно за тебя получить ?


← →
TechnoDreamer ©   (2005-09-30 18:22) [2]

А что именно не понятно? Как сжать файлы?
Для этого есть куча компонентов. Вот например неплохой:
http://www.componentace.com/zip_component_zip_delphi_zipforge.htm#specification
Бесплатный для персонального пользования.
Или тут поищи, много чего есть:
http://www.torry.net/pages.php?id=300


← →
Ling ©   (2005-09-30 18:27) [3]

Ну допустим склеить файлы и заархивировать я могу (но всегда интересно, как это делают другие, может всё можно сделать проще и надёжнее).

Но хотя бы подскажите, как мне сохранить файл в BLOB?
Я все изменения в базу вношу, составив соответствующий запрос в ZSQLProcessor (до сих пор хватало, если это в корне не верно, то наставьте меня на путь истинный) , знаю, что у ZQuery BLOB-поля есть метод LoadFromFile, но он ругается на то, что данные ReadOnly; Что-бы составить ZUpdateSQL опять-же нужно составить запрос, а я не знаю, каким он должен быть, для BLOB.
Пробовал в ZQuery.SQL поставить "insert into .. ( .. , :blobvalue)", загрузить значение через TParam.LoadFromFile, и выполнить ZQuery.ExecSQL, но вылазить исключение, мол запрос неправильный.

Подскажите плиз, как это делается.


← →
TechnoDreamer ©   (2005-10-01 00:17) [4]

Что такое Zeos я не знаю, через ADO в Access я делаю так:
TBlobField(MainForm.Table1.FieldByName("File")).SaveToFile("filename");
TBlobField(MainForm.Table1.FieldByName("File")).LoadFromFile("filename");


← →
Ling ©   (2005-10-01 10:52) [5]

Удалено модератором
Примечание: Создание пустых сообщений


← →
Ling ©   (2005-10-01 10:56) [6]


> TechnoDreamer


zeosdbo-6.5.1-alpha - довольно таки популярные компоненты для доступа к MySQL.
через loadFromFile  пробовал, но таблица грузится через запрос и потому она ReadOnly


← →
SERGEY-ZZZ   (2005-11-02 10:26) [7]

Если победил - подскажи и мне как это делать.


← →
Плохиш ©   (2005-11-02 10:38) [8]

Для случая [3] необходимо в 3й строке [4] заменить FieldByName на ParamByName и много читать справку.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.023 c
2-1133341058
solomon
2005-11-30 11:57
2005.12.18
Как в TWebBrowser е отключить загрузку картинок


5-1117163646
Rep
2005-05-27 07:14
2005.12.18
Обработка клавиши VK_UP(DOWN) потомком TCustomControl


2-1133247340
taraban
2005-11-29 09:55
2005.12.18
поможите люди


14-1132988411
Карелин Артем
2005-11-26 10:00
2005.12.18
Спам-фильтр в миранде по названию асечного клиента. Есть тако?


2-1133637592
kop
2005-12-03 22:19
2005.12.18
ADOTable




   Наверх