unidac直连oracle导入图片到表中

最新推荐文章于 2021-04-14 01:50:15 发布

原创最新推荐文章于 2021-04-14 01:50:15 发布 · 2.6k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#oracle #database #insert

本文介绍如何使用Delphi中的UniDAC组件将图片文件作为BLOB数据插入Oracle数据库。通过具体代码示例展示了设置数据库连接参数、构造SQL插入语句及加载文件到参数的过程。

var 
  UniConnection: TUniConnection; 
  UniQuery: TUniQuery; 
begin 
  UniConnection:= TUniConnection.Create(nil); 
  UniQuery:= TUniQuery.Create(nil);
  UniConnection.ProviderName := 'ORACLE';   
  UniConnection.SpecificOptions.Clear;
  UniConnection.SpecificOptions.Values['Direct'] := 'True';
  UniConnection.Server := 'host:port:database';  
  UniConnection.Username := 'username';
  UniConnection.Password := 'passwd'; 
  UniConnection.Connect; 
  UniQuery.Connection := UniConnection; 
  UniQuery.SQL.Text := 'insert into temp3 (a4,a6) values (:a4,:a6)'; 
  UniQuery.ParamByName('a4').AsString := 'pic1'; 
  UniQuery.ParamByName('a6').ParamType := ptInput; //这句是必要的
  UniQuery.ParamByName('a6').LoadFromFile('1.jpg',ftOraBlob);  
  UniQuery.Execute; 
end;

如果加这句UniConnection.SpecificOptions.Values['UseUnicode'] := 'True';就执行报错