怎么用Insert Into ..Values...方法保存任意文件到SQLserver 数据库的 Text 字段？ 谢谢大家。

Hi, 若是要保存任意文件, 必需使用 image 型態的字段, 程式範例如下,    create table t_file (   sno int,   sfile image )    

procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOQuery1.SQL.Text := 'insert into t_file (sno, sfile) values (5, :sfile)';
  ADOQuery1.Parameters.ParamByName('sfile').LoadFromFile('c:\1.jpg', ftBlob);
  ADOQuery1.ExecSQL;
end;    procedure TForm1.Button2Click(Sender: TObject);
begin
  ADOQuery1.SQL.Text := 'select * from t_file order where sno=5';
  ADOQuery1.Open;
  TBlobField(ADOQuery1.FieldByName('sfile')).SaveToFile('c:\2.jpg');
  ShowMessage('finished');
end;

为什么不能用text ？< >< >

我用Text把文件保存进去， 但读出来不对，小了一些，文件损坏。

要是文件 几百M，比内存还大，怎么处理？

你好 mssql的text好像有大小的限制最大好像2mb,所以建議你,如果可以的話用存路徑檔名的方式,在用shellexecute去呼叫那個路徑檔名,這樣看可不可以!! Pillar Wang

------
Pillar Wang

几M 几十M 一般都可以，主要想 达到一个资源共享的目的？

因為檔案大多數是二進位檔, 少數是文字檔, 若要能存任意的檔案, 就得使用 image 這種型態. 至於存入超大型檔案, 就不建議存入資料庫了, 建議你存在共用磁碟上, 並將路徑存入資料庫中, 也是可以達到共用的目地, 而且磁碟的存取效能絕對好上資料庫很多, 所以不建議存大檔案!!