Conexão com Acess em tempo de execução

Boa tarde pessoal.
Estou com um problema para realizar conexão em tempo de execução com o banco acess.
eu pego o caminho do banco em uma função, e jogo na estring de conexão do ado Connection, mais não esta funcionando de forma alguma. Obs: eu realizo a mesma programação em um outro sistema e funciona perfeitamente.


   AdoConnection.ConnectionString :='Provider=MSDASQL.1;Password=SYSTEM;Persist Security Info=True;User ID=system;'+
   'Data Source=BancoSMS;Extended Properties="DSN=BancoSMS;DBQ='+EndBanco+';DriverId=281;FIL=MS Access;'+
   'MaxBufferSize=2048;PageTimeout=5;PWD=SYSTEM;UID=admin;"'+
   ';Initial Catalog='+EndBanco;