同时连接多个DB在DELPHI是否可以做到???
经过六个小时的奋战,发现还是做不到,真的觉得有些奇怪,不知我的CODE是不是有问题,不管是程序还是编译器的,先发上来请教一下。
ADOConnection1.ConnectionString := '';
ADOConnection1.LoginPrompt := false;
ADOConnection1.KeepConnection := true;
ADODataSet1.Connection := ADOConnection1;
ADODataSet1.CursorLocation := clUseClient;
ADOConnection2.ConnectionString := '';
ADOConnection2.LoginPrompt := false;
ADOConnection2.KeepConnection := true;
ADODataSet2.Connection := ADOConnection2;
ADODataSet2.CursorLocation := clUseClient;
ADOConnection1.Open;
ADODataSet1.CommandText := '';
ADODataSet1.Open;
ADOConnection2.Open; ---编译到这里出错 :一个ORA的错:"连接已关闭"
ADODataSet2.CommandText := '';
ADODataSet2.Open;
ADODataSet1.Close;
ADODataSet2.Close;
ADOConnection2.Close;
ADOConnection1.Close;
请教一下高人们,这里为什么,对CONNECTION还要有什么配的吗?或是DATASET?
如果有遇到过这类问题的朋友,请将解决方法写的详细一些,再告诉小弟一下原因。谢谢。
我的几个同事都遇到过同样的问题。
注:同样的代码有一支FUNCTION编译通过,并且顺利执行,但另外几支FUNCTION不可以,都是我写的,都是在我的PC上写的,所以环境是相同的。两支FUNCTION的唯一不同只是在CONNECIONT1。OPEN后,一个写ADVSTRINGGRID,一个是写EDIT。TEXT。