能不能将一个文件以流的形式存入到MSSQL中? 请问,能不能将一个文件以流的形式存入到mssql的一个表中,该如何实现呢? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 没有问题,用Image字段,与保存图片方法基本一样.论谈上关于数据库存图片的方法很多 http://www.onlamp.com/pub/a/php/2000/09/15/php_mysql.html var tf:tfilestream; name,path:string; p:integer;begin p:=0; if form1.OpenDialog1.Execute then begin try name:=form1.OpenDialog1.FileName; form1.OpenDialog1.GetNamePath; showmessage(name); tf:=tfilestream.Create(name,fmOpenRead); adoquery1.Edit; adoquery1.Insert; tblobfield(adoquery1.FieldByName('contect')).loadfromstream(tf);//contect为表中存储文件内容的字段名 p:=pos('.',name); name:=copy(name,p,length(name)-p+1); adoquery1.FieldByName('name').Value:=name;//name为表中存储文件后缀名的字段 adoquery1.Post; tf.Free; except tf.Free; end; end; 存放exe文件时总是提示invaild blob length,怎么处理啊! 呵呵,方法跟上面的差不多,TBlobField().savatoStream就行了! 在 Delphi 中如何实现Excel转换Pdf ? delphi 报表打印控件 checkbox的问题??? RichEdit怎样读取有图片的rtf格式文件? ★★★关于二维动态数组的一个问题,不知道是怎么回事?我给100分。谢谢 如何在程序中改变系统日期显示格式? 哈哈,原来我很菜!简单问题。 关于打印 怎么可用分不增加啊!! 有语言的控件么?想做个朗读英文单词,句子的软件,有这方面的开发体会么? 数据格式转换问题!在线等!(100分) 怎样在sql server中存储JPG格式的图片和读取此格式图片
tf:tfilestream;
name,path:string;
p:integer;
begin
p:=0;
if form1.OpenDialog1.Execute then
begin
try
name:=form1.OpenDialog1.FileName;
form1.OpenDialog1.GetNamePath;
showmessage(name);
tf:=tfilestream.Create(name,fmOpenRead);
adoquery1.Edit;
adoquery1.Insert;
tblobfield(adoquery1.FieldByName('contect')).loadfromstream(tf);//contect为表中存储文件内容的字段名
p:=pos('.',name);
name:=copy(name,p,length(name)-p+1);
adoquery1.FieldByName('name').Value:=name;//name为表中存储文件后缀名的字段
adoquery1.Post;
tf.Free;
except
tf.Free;
end;
end;