--读
TempSql.SQL.Add(‘Select rptblob from RPTDEF where bianh = :bianh ‘);
TempSql.ParamByName(‘bianh‘).AsString := ‘8061‘;
TempSql.Open;
TBlobField(TempSql.FieldByName(‘rptblob‘)).SaveToFile(‘8061.fr3‘);
--插入、更新
insSql.SQL.Add(‘INSERT INTO RPTDEF (BIANH, RPTBLOB) VALUES (:BIANH, EMPTY_BLOB()) RETURNING RPTBLOB INTO :RPTBLOB‘);
Update RPTDEF set rptblob = EMPTY_BLOB() where bianh = :bianh Returning RptBlob Into :RptBlob
insSql.ParamByName(‘rptblob‘).ParamType := ptInput;
insSql.ParamByName(‘rptblob‘).AsOraBlob.LoadFromFile(AppPath);
oracle Blob处理
标签:adf update input into insert psql ret ora oracl
本条技术文章来源于互联网,如果无意侵犯您的权益请点击此处反馈版权投诉
本文系统来源:https://www.cnblogs.com/maweiwei/p/11961689.html