如何把文件存入SQL Server 2000数据库?使用什么字段、怎么取出?
解决方案 »
- xlsreadwrite vs Excel2007
- 创建dll时总是出现“Symbol 'INDEX' is specific to a platform”错误是何回事?
- listview里每一行怎么设置小图标?ICON
- 我实在是想不出来,一个关于数据库查询问题,帮帮我!!!!!
- 哪里有“DELPHI 5编程实例与技巧”源代码下载?
- 您好.请教有关项目文件的几个问题。(一个初学者的焦虑)
- 如何将一个窗体(form)设置为“总在最前”?
- 我的新硬盘用FDISK命令分区怎么不是FAT32而是PRI DOS呢?(问题解决50分)
- 制作安装程序时,配置BDE参数遇到问题的请进。
- delphi 怎么调用sendmessage获取取其它程序窗口listviewj里的数据内容
- 请问怎么将两条指定的纪录之中的两个字段加起来,并且保存到其中一条纪录,删除另外一条纪录?
- interbase的默认密码是多少???user=myname。急!
SQL.Add('insert into SYS_Update (ProgramName,PData) values '+
' (:PName,:PD)');
ParamByName('PName').Value:=FileName;
ParamByName('PD').LoadFromFile(LocalFile,ftBlob);
ExecSQL;
SQL.Add('select ProgramName,PData from SYS_Update where ProgramName=:FileName ');
ParamByName('FileName').Value:=Trim(FileOrgName);
Open;
iStream:=TMemoryStream.Create;
TBlobField(FieldByName('PData')).SaveToStream(iStream);
iStream.SaveToFile(__TempPath+Trim(FieldByName('ProgramName').AsString));