Erro ADO Access

Delphi

29/10/2003

Boa tarde!

Estou com problemas na execução do seguinte código:



Connection.Close;
Connection.ConnectionString := ´´;
Connection.ConnectionString := Connection.ConnectionString +
´Provider=Microsoft.Jet.OLEDB.4.0;´ +
´User ID=Admin;´ +
´Data Source=´ + CaminhoBD + ´;´ +
´Mode=Share Deny None;´ +
´Extended Properties=´´;´ +
´Jet OLEDB:System database=´´;´ +
´Jet OLEDB:Registry Path=´´;´ +
´Jet OLEDB:Database Password=´´;´ +
´Jet OLEDB:Engine Type=4;´ +
´Jet OLEDB:Database Locking Mode=0;´ +
´Jet OLEDB:Global Partial Bulk Ops=2;´ +
´Jet OLEDB:Global Bulk Transactions=1;´ +
´Jet OLEDB:New Database Password=´´;´ +
´Jet OLEDB:Create System Database=False;´ +
´Jet OLEDB:Encrypt Database=False;´ +
´Jet OLEDB:Don´´t Copy Locale on Compact=False;´ +
´Jet OLEDB:Compact Without Replica Repair=False;´ +
´Jet OLEDB:SFP=False´;
try
Connection.Open;
except
Screen.Cursor := crDefault;
raise Exception.Create(´Não foi possível conectar ao Banco de Dados. ´ +
´Configure o Caminho do Banco de Dados novamente.´);
end;





O que acontece é que em apenas um dos computadores do cliente que eu executo provoca a excessão. Detalhe:

- DAO 3.5 está instalado
- BDE está instalado (apesar de eu não fazer o acesso via BDE)
- MDAC 2.61 está instalado
- O ´Caminho do Banco de Dados´ está configurado corretamente

O que estou fazendo de errado?


Bráulio Auditoria

Bráulio Auditoria

Curtidas 0
POSTAR