unidac直连oracle导入图片到表中

最新推荐文章于 2024-04-17 14:10:46 发布

Henry.6

最新推荐文章于 2024-04-17 14:10:46 发布

阅读量2.5k

点赞数

文章标签： oracle database insert

本文链接：https://blog.csdn.net/6rl/article/details/6324144

版权

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';就执行报错