怎样调用udl文件？解决方案

怎样调用udl文件？
我在调用udl文件时总是提示‘连接字符串属性无效的错误’，应该怎样解决？代码如下：
procedure   TDM.DataModuleCreate(Sender:   TObject);
  var
        AppPath:array       [0..MAX_PATH]       of       Char;
        LW:LongWord;
        Path,ConnectStr:String;
begin
      LW:=GetModuleFileName(Hinstance,@AppPath,SizeOf(AppPath));
            SetString(Path,AppPath,LW);
            ConnectSTr:= 'File       name= '+ExtractFilePath(Path)+ '1.udl ';
            Adoc.Connected:=False;
            try
                    Adoc.ConnectionString:=ConnectStr;
                    Adoc.Connected:=True;
            Except
                    MessageDlg( '连接资料库失败! ',mtInformation,[mbok],0);
                    Application.Terminate;
            end;
end;

[解决办法]
浪费几分钟时间做一个吧，


:)