adocommand1先是与一个Oracle服务器建立连接然后执行
with adocommand1 do
begin
commandtext:='';
commandtext:='create database link hbwnps connect to hbwnps identified by wnps_6610 using '+#39+'HBZJK'+#39;
execute;
end;//已通过对另一个Oracle服务器连接
然后执行
procedure TForm1.Button2Click(Sender: TObject);
begin
with adoquery1 do//adoquery1与adocommand1连接的服务器一样
begin
close;
sql.Clear;
sql.Add('select * from t_xm_pubinfo@hbwnps');
open;
end;
end;
报'ora-12154:tns无法处理服务名'
with adocommand1 do
begin
commandtext:='';
commandtext:='create database link hbwnps connect to hbwnps identified by wnps_6610 using '+#39+'HBZJK'+#39;
execute;
end;//已通过对另一个Oracle服务器连接
然后执行
procedure TForm1.Button2Click(Sender: TObject);
begin
with adoquery1 do//adoquery1与adocommand1连接的服务器一样
begin
close;
sql.Clear;
sql.Add('select * from t_xm_pubinfo@hbwnps');
open;
end;
end;
报'ora-12154:tns无法处理服务名'
// Oracle Data Access Components
// Copyright (c) 1998-2006 Core Lab. All right reserved.
// Oracle DataSet
// Created: 05.03.98
// Last modified: 21.02.03
//////////////////////////////////////////////////
这个东西很好用 建议使用