高手分析一下这段代码

Question

var 
test : variant ;
conn ：_connection;
begin
  test := CreateOleObject('ADODB.CONNECTION');
  test.ConnectionString := 'Provider=MSDAORA.1;Password=***;User ID=***;Data Source=***';
  test.Open('','','',-1);
end;
我的本意是创建ADOconnection的，上面这段代码创建了一连接，可是我不知道如何引用它？如何将它与conn联系起来？？

Answer 1

上面的代码本身就把test创建成了一个adoconnection对象。直接使用就可以了。