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

Как в таблицу Access засунуть документ Word и как с ним работать   Найти похожие ветки 

← →
AFROLOV   (2002-04-09 15:58) [0]

Привет всем.
Как в таблицу Access засунуть документ Word (так что бы он лежал в базе а не болтался в виде отдельного файла) и как с ним потом работать(вытаскивать из базы)?
Заранее большое спасибо.


← →
AFROLOV   (2002-04-10 10:15) [1]

Не ужели никто с этим не сталкивался?


← →
Dok_3D ©   (2002-04-10 10:20) [2]

Как как ...
Также как с обычным файлом.
Или это тоже непонятно ?


← →
AFROLOV   (2002-04-10 11:06) [3]

А как с обычным файлом? Я до этого момента с подобной задачей не сталкивался.


← →
Dok_3D ©   (2002-04-10 11:52) [4]

Только вчера отвечал на тоже самое только наоборот

var BlobStream : TStream;
FileStream : TFileStream;
begin
FileStream:=TFileStream.Create("имя файла",fmRead);
BlobStream:=Query.CreateBlobStream(Query.FieldByName ("MEMOFIELD"),bmWrite);
BlobStream.CopyFrom(TFileStream,0);
BlobStream.Free;
FileStream.Free;
end;

Теоретически должно получиться ... Хотя в ACCESS никогда не пробовал.


← →
AFROLOV   (2002-04-10 12:19) [5]

Спрасибо. Буду пытаться.


← →
Dok_3D ©   (2002-04-10 12:51) [6]

Немного обманул ... Вот так лучше:

var BlobStream : TStream;
FileStream : TFileStream;
begin
FileStream:=TFileStream.Create("имя файла",fmOpenRead);
Query.Edit;
BlobStream:=Query.CreateBlobStream(Query.FieldByName ("MEMOFIELD"),bmWrite);
BlobStream.CopyFrom(FileStream,0);
BlobStream.Free;
FileStream.Free;
Query.First; // ну или Next какой-нибудь, чтобы изменения вступили в силу
end;



← →
AFROLOV ©   (2002-04-17 11:20) [7]

А как его из поля достать?



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

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



Память: 0.46 MB
Время: 0.01 c
14-39837
kosty
2002-04-03 08:16
2002.05.13
база


1-39805
foks
2002-04-28 15:33
2002.05.13
Как добавить пункт меню в работающее приложение


14-39834
alexandervasjuk
2002-04-02 15:16
2002.05.13
Помни имя своё, Delphi


14-39836
MBo
2002-04-03 12:02
2002.05.13
Конкурс для начинающих


1-39747
BLiN
2002-04-27 17:53
2002.05.13
Как организовать задержку в Delphi меньше 1 мс




   Наверх