delphi的数据库编程,往sql server中存储文件(如word文档),存为image类型,用流的方式.
如果采用ADO组件,可以用以下语句:
创建文件流:
Word_FileStream:=TFileStream.Create(Target_Name,fmOpenWrite or fmCreate);
Word_FileStream.Position:=0;
保存到数据库的Image字段:
TBlobField(AdoQuery1.FieldByName(Column_Name)).SaveToStream(Word_FileStream);
从数据库读取文件到本地硬盘:
TBlobField(ADOQuery1.FieldByName(Column_Name)).loadfromStream(Word_FileStream);如果采用BDE组件呢??应该怎么实现以上的功能呢????可以实现么????
如果采用ADO组件,可以用以下语句:
创建文件流:
Word_FileStream:=TFileStream.Create(Target_Name,fmOpenWrite or fmCreate);
Word_FileStream.Position:=0;
保存到数据库的Image字段:
TBlobField(AdoQuery1.FieldByName(Column_Name)).SaveToStream(Word_FileStream);
从数据库读取文件到本地硬盘:
TBlobField(ADOQuery1.FieldByName(Column_Name)).loadfromStream(Word_FileStream);如果采用BDE组件呢??应该怎么实现以上的功能呢????可以实现么????
写翻了应该是
保存到数据库的Image字段:
TBlobField(ADOQuery1.FieldByName(Column_Name)).loadfromStream(Word_FileStream);
从数据库读取文件到本地硬盘:
TBlobField(AdoQuery1.FieldByName(Column_Name)).SaveToStream(Word_FileStream);试试吧,不行的话用内存流
如果是采用BDE组件,应该怎么写呢???to stiffe()
用text类型,采用bde组件,应该如何用上述的语句呢???