如何把文件保存到数据库中 我有一个文件,请问如何保存到数据库中(sqlserver 200),又怎么取出来保存成文件? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 存文件 ADOQuery1.Append; ADOQuery1.FieldByName('ID').AsInteger:=id; ADOQuery1.FieldByName('WritID').AsString:=vwsid; ADOQuery1.FieldByName('CoupletName').Value:=Trim(Edit1.Text); TBlobField(ADOQuery1.FieldByName('CoupletContent')).LoadFromFile(''D:\abc.vts'); ADOQuery1.Post;取文件 TBlobField(ADOTable1.FieldByName('CoupletContent')).SaveToFile('c:\abc.vts'); 设一个 image 类型字段保存文件,再设一个文本型字段保存文件的扩展名,取文件时再以这个扩展名保存成文件,具体方法3楼的已说了 今天弄明白了 Windows 快捷键的来由, 很高兴! 大家给指个方向! 有个用DELPHI做的小项目。有兴趣想要做的可以和我联系! Socket多线程问题 100分求FTP客户端源码 怎么将这段C代码转为的Delphi的? 如何实现用网页的方式调用窗体!!急急急!! 好文:利用WM_COPYDATA消息实现程序间的数据传递 一个对数据库进行操作的问题! 高分求delphi cdkey image控件的图片范围外框总是填满窗体的属性是什么? 大家来讨论一下Borland Delphi 2005吧...
ADOQuery1.Append;
ADOQuery1.FieldByName('ID').AsInteger:=id;
ADOQuery1.FieldByName('WritID').AsString:=vwsid;
ADOQuery1.FieldByName('CoupletName').Value:=Trim(Edit1.Text);
TBlobField(ADOQuery1.FieldByName('CoupletContent')).LoadFromFile(''D:\abc.vts');
ADOQuery1.Post;
取文件
TBlobField(ADOTable1.FieldByName('CoupletContent')).SaveToFile('c:\abc.vts');