Отправлено: 28.09.13 17:04. Заголовок: Как правильно считать бинарные файлы в базу ?

Всем привет.
Подскажите пожалуйста как правильно считать бинарные файлы (ZIP, DOC, EXE) и записать в базу в поле типа BLOB
(или это можно делать в простое мемо-поле FPT) ?
И как сделать обратную операцию, записать из поля в бинарный файл ?
Заранее спасибо за помощь....

 Отправлено: 28.09.13 18:18. Заголовок: Сделать это не пробл..

Сделать это не проблема но чую антивирус даст тебе прикурить по полной

 Отправлено: 28.09.13 22:18. Заголовок: Dima пишет: Сделать..

Dima пишет:

цитата:

Сделать это не проблема

Как ?
FileStr() можно использовать для бинарных файлов или нет ?

Или нужно использовать низкоуровневое чтение, типа:
nFileHandle := FOpen( cFile, FO_READ )
nFileSize := FSeek( nFileHandle, 0, FS_END )
cStream := Space( nFileSize )
FSeek( nFileHandle, 0, FS_SET )
FRead( nFileHandle, @cStream, nFileSize )
FClose( nFileHandle )

а там далее типа:
FIELD->POLEBLOB := cStream


И какое ограничение на буфер в Харборе есть ?
100 Мб можно сразу считать или нет ?

 Отправлено: 29.09.13 09:38. Заголовок: Андрей, проверь: ht..

Андрей, проверь:
http://www.harbourminigui.com/clipperng/ng1583f.php
http://www.harbourminigui.com/clipperng/ng1439e.php

 Отправлено: 29.09.13 11:20. Заголовок: Andrey пишет: FileS..

Andrey пишет:

цитата:

FileStr() можно использовать для бинарных файлов или нет ?

А кто запретит:

FUNC Main()

STRFILE(FILESTR("1.exe"),"2.exe")

RETURN

1.exe - тестовый пример Harbour размером 1360Kb, скопировался без единого писка в 2.exe
2.exe - запустился, как ни в чем не бывало

Скрытый текст

После Clipper глаза вылезают от такого размаха...

 Отправлено: 29.09.13 15:24. Заголовок: PSP пишет: Андрей, ..

Sergy пишет:

цитата:

После Clipper глаза вылезают от такого размаха...

Это точно...

PSP пишет:

цитата:

Андрей, проверь:

То что надо. Спасибо !

Для работы с BLOB как нужно объявлять в начале программы, т.е. какой драйвер базы использовать ?

 Отправлено: 29.09.13 17:00. Заголовок: Andrey пишет: какой..

Andrey пишет:

цитата:

какой драйвер базы использовать

DBFBLOB вероятно

 
     + added new RDD DBFBLOB compatible with CL5.3 DBFBLOB 
       It operates on memo files only (.dbv) without tables (.dbf) 
       To create .DBV file use: 
          dbCreate( cFile, {}, "DBFBLOB" )