把选择的文件放入一字段： TBlobField(QryMaster.FieldByName('Content')).LoadFromFile(Opendialog.FileName);保存是SQL语句会出错！请问是和原因？

如果SQL语句不出错，但保存后还是为空值？请问是何原因？

之前用BDE元件來存取Blob欄位時,也有發生像你一樣的問題,後來發現是BDE元件本身的問題,換成ADO元件後就OK了,建議試看看吧!!

请问有无ADO的代码示例？

sl@cableplus.com.cn 你好:    用 Transaction 試試看, 如:

Database1.StartTransaction;
try
  TBlobField(QryMaster.FieldByName('Content')).LoadFromFile(Opendialog.FileName);
  Database1.commit;
except
  DataBase.RollBack;
  raise;
end;   

引言: 把选择的文件放入一字段： TBlobField(QryMaster.FieldByName('Content')).LoadFromFile(Opendialog.FileName);保存是SQL语句会出错！请问是和原因？

var FileStream: TFileStream; BLOBStream: TBLOBStream; begin if FileExists(Opendialog1.FileName) then begin QryMaster.Edit; try FileStream := TFileStream.Create(Opendialog1.FileName, fmOpenRead); try BLOBStream := TBLOBStream.Create(TBLOBField(Table1.FieldByName('Content')),bmReadWrite);试试这样写行不行 BLOBStream.CopyFrom(FileStream, FileStream.Size); finally BLOBStream.Free; end; QryMaster.Post; finally FileStream.Free; end; end; end; ——行径窄处，留一步与人行——

根据大大的代码保存结果仍然为空！我是用BDE

TBlobField(ADOQuery1.FieldByName(Column_Name)).loadfromStream(Word_FileStream); 请问如果改成ADO写法，那ADOQUERY1里应该怎么写SQL语句？

引言: 根据大大的代码保存结果仍然为空！我是用BDE

不知你是通过什么来读出来的？可否告之，因为我测试了能传值给Content，也没出现问题。 ——行径窄处，留一步与人行——

这就是我的全部代码啊？不知道怎么读出来？ADO里的SQL语句（select content from smalldoc) Word_FileStream := TFileStream.Create(Opendialog1.FileName, fmOpenWrite or fmCreate); Word_FileStream.Position := 0; try // Word_FileStream.LoadFromFile(Opendialog1.FileName); AdoUpdateContent.edit; TBlobField(AdoUpdateContent.FieldByName('Content')).LoadFromStream(Word_FileStream); AdoUpdateContent.Post;

引言: 请问有无ADO的代码示例？

從檔案存入資料庫: adoQuery.Close; adoQuery.SQL.Clear; adoQuery.Parameters.Clear; adoQuery.SQL.Add('INSERT INTO [FileTable] (FileData)'); adoQuery.SQL.Add('VALUES (:FileData)'); adoQuery.Parameters.ParamByName('FileData').LoadFromFile('FileName.doc',ftBlob); adoQuery.ExecSQL; 從資料庫中讀出來存成檔案: TBlobField(adoQuery.FieldByName('FileData')).SaveToFile('FileName.doc');

非常感谢minjiu大大！！！ 还有一个问题，我在编辑状态下，按一个按钮就直接可以把保存进去的WORD打开，请问该怎么办？

我现在另存为的文件 TBlobField(QryMaster.FieldByName('content')).SaveToFile(SaveDialog1.FileName); 都打不开，一是说要检查文档或驱动器的文件权限，二是说要定位文档，但定位以后还是不能打开，请教是怎么回事？

請問你的 QryMaster 是TQuery 還是 Ttable 如果是TQuery 你的 RequestLive 設成 TRUE 如果你的 select xxxx where xxxxx 後面指令很煩長 TQuery 會無法回寫 你要用另外一的 Table 或 Tquery元件找到要更新的此筆資料在更新來做

引言: 我现在另存为的文件 TBlobField(QryMaster.FieldByName('content')).SaveToFile(SaveDialog1.FileName); 都打不开，一是说要检查文档或驱动器的文件权限，二是说要定位文档，但定位以后还是不能打开，请教是怎么回事？

if SaveDialog1.Execute then TBlobField(QryMaster.FieldByName('content')).SaveToFile(SaveDialog1.FileName); ------------------------------------------------------------------ // 以對應的應用程式,將文件開啟 uses ShellAPI; .... .... // 暫存文件 TBlobField(QryMaster.FieldByName('DocContent')).SaveToFile('temp.doc'); // 呼叫對應的應用程式,將文件開啟 ShellExecute(Application.handle,pchar('OPEN'),pchar('temp.doc'),nil,nil,0);