连接数据库SQLSERVER 的问题

project hmis.exe raised exception class EoleException with message'[DBNETLIB][ConnectionOpen(conect()).]'SQL SERVER 不存在或拒绝访问。
前台程序提示：‘与数据库服务器连接未成功，请重新配置'’
部分代码如下：
 CString:='Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=';  //字符串CString赋值
    str := ini.ReadString('Database','Initial Catalog','HMIS'); //从配置文件读数据库名
    CString := CString+str;                //追加从配置文件读入的数据库名字符串
    str1 := ini.ReadString('Database','Data Source','FLYYCS');  //从配置文件读数据库服务器名
    CString := CString+';Data Source=';    //追加字符串到CString
    CString := CString+str1;               //追加从配置文件读入的数据库服务器名字符串
    DM.ADOConnection.Connected := false;
    DM.ADOConnection.ConnectionString := CString;  //数据库连接属性字符串赋新值
    try            //捕捉异常
      DM.ADOConnection.Connected := true;  //启动与数据库服务器的连接
//      AT_Assis.Active := true;          //激活各个数据表与服务器的连接
      AT_Count.Active := true;  //计数表
      AT_OFWork.Active := true;  //工作、休息代码表
      AT_PInput.Active := true;
      AT_CReg.Active := true;
      AT_CMoney.Active := true;
      AT_HReg.Active := true;
      AQ_CDrug.Active := true;
      AQ_Person.Active := true;
      AQ_PInputB.Active := true;
      AQ_PKucun.Active := true;
      AQ_TCMoney.Active := true;
    except        //抛出异常
      ShowMessage('与数据库服务器连接未成功，请重新配置');
    end;
注：我用ODBC可以连接数据库
请问这个是哪里出了问题？？？