有关ADO数据库连接的问题！！！(50分)

我将一个ADOConnection控件放在一个Data Module中，然后另外一个窗体中的ADOQuery控件的Connection属性设置为了DataModule1.ADOConnection1，可是为什么运行后就提示：Missing Connection or ConnectionString的错误呢。我前面的ADOConnection1已经连接到数据库了呀，并已测试连接成功了呀？

Data Module是在TQuery所在的窗口前创建的吗
如果是在TQuery所在的窗口在Data Modul创建前先引用的话那会联接不成功的

在使用前检测一下，如果没创建连接先创建再用。

Connectioned先要FALSE，在代吗中TRUE；

adoconnection1.Connected:=False;
sData:=ExtractFileDir(ParamStr(0))+'/XXX.mdb';
　　　　　　　　　　　　　　　　　　　　　 ------->程序目录的数据库文件
ADOconnection1.ConnectionString :=
'Provider=Microsoft.Jet.OLEDB.4.0;'+
'Data Source='+sData+';'+
'Persist Security Info=False';
adoconnection1.Connected:=True;