读书人

oracle 数据库blob类型存放Excel文件

发布时间: 2012-02-29 16:44:10 作者: rapoo

oracle 数据库blob类型存放Excel文件 如何以Excel形式显示出来
挂单表gd_struct中三个字段 ID integer,file_name varchar(100),file_excel blob。
file_name 存放EXCEL文件名;file_excel 存放EXCEL文件。点击 显示 按钮后,如何以EXCEL文件显示出来?

[解决办法]

Delphi(Pascal) code
 
procedure TForm1.Button1Click(Sender: TObject);//保存文件
var str:Tmemorystream;
begin
str:=Tmemorystream.Create;
str.LoadFromFile('c:\1.xls');
str.Position:=0;
adoquery1.Append;
Tblobfield(adoquery1.FieldByName('fieldname')).loadfromstream(str);
try
adoquery1.Post;
finally
str.Free;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);//读取文件
var str:Tmemorystream;
begin
str:=Tmemorystream.Create;
str.Position:=0;
Tblobfield(adoquery1.FieldByName('fieldname')).savetostream(str);
str.SaveToFile('c:\2.xls');
str.Free;
end;

[解决办法]
用流Tmemorystream取。。。
[解决办法]
step1:把blob的存成文件 or stream
setp2:文件 or stream 插入到excel

一下你blob字段的容是什啊?是不是片啊?

读书人网 >.NET

热点推荐