如何把文件做为附件，保存到数据库里，就像发邮件的附件一样

Question

如何把文件做为附件，保存到数据库里

Answer 1

数据库字段用BLOB字段。
程序里用 TBlobField.SavetToStream();
TBlobField.LoadFromStream();
就可以了。

Answer 2

把文件存到数据库中
      //保存文件----------------------------------------------------------------
      qry_Local1.Close;
      qry_Local1.SQL.Text:='SELECT * FROM SQGW WHERE F_ID='+QuotedStr(vsid);
      qry_Local1.Open;
      qry_Local1.Edit;
      TBlobField(qry_Local1.FieldByName('F_FILE')).LoadFromFile('c:\aa.txt');
      qry_Local1.Post;