Как установить размер Blob поля в Access?

← →
CKC © (2006-05-04 12:43) [0]

Из Delphi создаю Access файл, создаю в нем таблицу с Blob (Ole) полем и пытаюсь положить в это поле файлы. Но все они обрезаются до 32 kb. Как установить нужный размер поля?

Вот на всякий случай используемый код:

var
DBEngine, Workspace: Variant;
db, td, recordset, recordset_f: Variant;
const
dbLangGeneral = ";LANGID=0x0409;CP=1252;COUNTRY=0";
begin
DBEngine := CreateOleObject("DAO.DBEngine.36");
Workspace := DBEngine.Workspaces[0];
Workspace.CreateDatabase("test", dbLangGeneral, EmptyParam);
db := DBEngine.OpenDatabase("test");

td := db.CreateTableDef("tbl1", 0, "", "");
td.Fields.Append(td.CreateField("fld1",arrMDBTypes[ftBlob]));
....

← →
Desdechado © (2006-05-04 12:47) [1]

компоненты доступа?

← →
CKC © (2006-05-04 12:56) [2]

Так нет никаких компонентов. COM объект делаю "DAO.DBEngine.36".

← →
Сергей М. © (2006-05-04 13:45) [3]

> пытаюсь положить в это поле файлы

Показывай как пытаешься..

← →
CKC © (2006-05-04 13:55) [4]

recordset := db.OpenRecordset(test", EmptyParam);
recordset.Fields[0].Value := qryDoccontent.Value; //qryDoccontent - это blob поле в TDataSet
recordset.Update(dbUpdateRegular, False);// где dbUpdateRegular=1

← →
Сергей М. © (2006-05-04 14:21) [5]

> CKC © (04.05.06 13:55) [4]

Ну и где у тебя вызов метода Recordset.Edit или Recordset.AddNew ?

← →
CKC © (2006-05-04 15:03) [6]

да я пропустила просто, вот так на самом деле. это не важно. проблема-то не в этом. когда access файл ручками создаёшь, всё норамльно в него записывается, а когда программно, то blob обрезается. может параметр какой надо указать при создании?

recordset := db.OpenRecordset(test", EmptyParam);
recordset.AddNew;
recordset.Fields[0].Value := qryDoccontent.Value; //qryDoccontent - это blob поле в TDataSet
recordset.Update(dbUpdateRegular, False);// где dbUpdateRegular=1

рассказывай, откуда и как взялось qryDoccontent.Value

Выбралось из таблицы бд на sql server"е :) с ним все нормально, оно из программы замечательно отображается ( в смысле документы которые в нём находятся открываются)
я только что провела эксперимент, если сначала сохранить файл из этого блоба на диске, а потом с диска вложить его в таблицу access , то почему-то всё работает... оставлю пока так.

> сначала сохранить файл из этого блоба на диске,

Приведи код.

> с диска вложить его в таблицу access

Приведи код.

Как установить размер Blob поля в Access? Найти похожие ветки