在ACCESS中存取二进制文件???

into 2003-10-22 01:58:36
在ACCESS中的一个表中定义了一个字段是OLE 对象
用来存储一个二进制文件(*.bin)
用下列语句可以保存(但不知道是不是应该这么写)

adoquery1.Append ;
adoquery1['temp']:=extractfilename('E:\256.bin');
adoquery1.FieldByName('id').AsString:='v3.0';
adoquery1.SaveToFile('E:\256.bin');

如果是对的如何把它取出来赋给一个FILE类型的变量
...全文
67 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
wooden954 2003-10-22
  • 打赏
  • 举报
回复
最好这样写:
var
Stm:TFileStream;

Stm:=TFileStream.Create('你的文件名',fmOpenRead);//打开文件读取到流

Stm.Position:=0;
TBlobField(Adoquery1.FieldByname('temp')).LoadFromStream(Stm);//存文件流到字段
Stm.Free;
//---------------------------------------------------------------------------
var
Stm:TFileStream;

Stm:=TFileStream.Create('你的文件名',fmWrite);//打开文件读取到流

Stm.Position:=0;

TBlobField(Adoquery1.FieldByname('temp')).SaveToStream(Stm);//取字段内容到文件流
Stm.Free;

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧