如何把excel文件作为一个字段的值存到sqlserver数据库,bde.
解决方案 »
- TIdSyslogServer控件怎么使用
- 关于delphi控制word插入页码的问题,在线等
- 【各位老大,C++定义如何转化成PASCAL定义。200分】
- 做过连锁配送的朋友,请帮我看看方案,如何解决异地数据交互?嫌分不够单独给!
- 介绍学习delphi的书籍,我已熟悉vc
- 不敢再用 SecondsBetween 了
- 新手提问:DBImage的问题??
- Delphi如何做到监视一个WEB窗口的运行,并能截取WEB窗口发往网站的消息?在线等候...
- 关于inputbox的问题,很简单,送分!
- 请问如何发布三层MIDAS程序在广域网上?急需。。在线等待
- 紧急求助!(在线!)
- 还是几个极菜的问题!!!!请拉兄弟一把!!!!
begin
str:=Tmemorystream.Create;
str.LoadFromFile('c:\page.xls');
str.Position:=0;
adoquery1.Append;
Tblobfield(adoquery1.FieldByName('tt')).loadfromstream(str);
try
adoquery1.Post;
finally
str.Free;
end;//存储文件var str:Tmemorystream;
begin
str:=Tmemorystream.Create;
str.Position:=0;
Tblobfield(adoquery1.FieldByName('tt')).savetostream(str);
str.SaveToFile(c:\gg.xls');
str.Free;//导出文件