Array
(
)

No Mapping for Error Code Found

Pedih
   - 01 dez 2004

amigos delphianos, boa tarde.
Vejam meu problema

> Minha conexao, em runtime.
> Params.Clear;
> ParamsLoaded := True;
> GetDriverFunc := ´getSQLDriverSQLServer´;
> LibraryName := ´dbexpmss.dll´;
> VendorLib := ´sqloledb.dll´;
> UserSQL := Trim(ADOTabConfig.FieldByName(´USERBANCO´).AsString);
> PassWordSQL := Trim(ADOTabConfig.FieldByname(´PASSWBANCO´).AsString);
> ServerName := Trim(ADOTabConfig.FieldByName(´SERVERNAME´).AsString);
> Caminho := Trim(ADOTabConfig.FieldByName(´CAMINHO´).AsString);
> DataBase := Trim(ADOTabConfig.FieldByName(´BASEDADOS´).AsString);
> DriverName := ´MSSQL´;
> ADOTabConfig.Close;
> Params.Add(´DriverName=´+DriverName);
> Params.Add(´User_Name=´+UserSQL);
> Params.Add(´Password=´+PassWordSQL);
> Params.Add(´BlobSize=-1´);
> Params.Add(´ErrorResourceFile=´);
> Params.Add(´LocaleCode=0000´);
> Params.Add(´HostName=´+Caminho);
> Params.Add(´DataBase=´+DataBase);
> Params.Add(´LongStrings=True´);
> Params.Add(´FetchAll=True´);
> Params.Add(´Connection Timeout=3´);
> Params.Add(´OS Authentication=False´);
> Erro: DBX Error: No Mapping for Error Code Found.
>
> Obs.
>
> Nem em tempo de Projeto, setando todas as informacoes eu consigo
> colocar a propriedade
>
> Conexao.Connected := True;
>
> *** da mesmo erro.
>
> Obs Importante:
>
> To colocando o exe no cliente, porem, deu erro de DRIVERNAME, ae, eu
> comecei a fazer uns testes aqui para identificar o pq do problema.
>
> Vi que era por causa dos arquivos DBXCONNECTIONS.INI e DBXDRIVERS.INI
>
> Que estão na pasta
>
> F:\Program Files\Common Files\Borland Shared\DBExpress
>
> Fui lá e alterei o nome deles (renomiei).
>
> Ae acusou o problema de DRIVERNAME, igual no cliente.
>
> Porem, agora mesmo voltando os nomes antigos, so da erro de
>
> Erro: DBX Error: No Mapping for Error Code Found.
>
> Mesmo em tempo de projeto
>
> Não sei o que fazer..
>
> Alguuem Pode ajudar ?