有关word保存到数据库的问题

[liuzg790313]

现在想把word文件存储到sqlserver2000中，并且还可以读取到本地。
我的解决办法是把文档当作字段处理，提交的时候用TBlobField,采用流的方法

具体代码如下 [Tadotable1的连接数据库已经设置好]
procedure TForm1.Button1Click(Sender: TObject);
var
Word_FileStream:TFileStream;
begin
if opendialog1.Execute then
begin
//创建文件流：
Word_FileStream:=TFileStream.Create(opendialog1.FileName ,fmOpenread);
Word_FileStream.Position:=0;

//保存到数据库的Image字段：
adotable1.Append ;
TBlobField(Adotable1.FieldByName('wenjian')).SaveToStream(Word_FileStream);
adotable1.post ;
Word_FileStream.Free ;
end;
end;

运行的时候却提示，“无法插入空行，行必须至少有一个列值集”，我看了一下我的这个数据库中的表，

很正常，只有一个字段，名为wenjian,类型为image.
大家帮我看看哪不对吧 真的很感谢 与

[winxkm]

不是TBlobField(Adotable1.FieldByName('wenjian')).SaveToStream(Word_FileStream);
是TBlobField(Adotable1.FieldByName('wenjian')).LoadFromStream(Word_FileStream);

[zzyyxxjc]

顶一下

[xujie839997]

顶一下