Conexão Firebird no Delphi XE6
Your user name and password are not defined.Ask your databse administrator to setup a Firebird login.
Desculpe-me,eu nao falo Portugues bem.
Este erro só ocorre em Windows 7, não em Windows 8.1
Utilizo DBExpress
Desculpe-me,eu nao falo Portugues bem.
Este erro só ocorre em Windows 7, não em Windows 8.1
Utilizo DBExpress
Ramon Fernández
Curtidas 0
Respostas
Raimundo Pereira
16/10/2015
Boa tarde.
Você precisa informar o nome do usuário e a senha de conexão com o banco de dados.
Geralmente o firebird usar
user=SYSDBA
Senha=masterkey
ABRA O NOTEPAD E
----------------------------------------------------------------------------------------
[CNX_BD]
DATABASE=CAMIHO DO BANCO DE DADOS
USERNAME=SYSDBA
PASSWORD=masterkey
-----------------------------------------------------------------------------------------
SALVE O ARQUIVO COMO CNX.INI
NA SUA APLICAÇÃO
DECLARE NA USES >>>IniFileS
NO ONCREAT DA APLICAÇÃO
var vArquivo:TIniFile;
Caminho_CONF:string;
begin
Caminho_CONF:=(ExtractFilePath(Application.ExeName) +'CNX.Ini');
if not (FileExists(Caminho_CONF)) then
begin
ShowMessage('Arquivo de conexão com o banco de dados não localizado.');
Application.Terminate;
end
else
begin
vArquivo:=TiniFile.Create(ExtractFilePath(Application.ExeName) +'CNX.Ini');
DM.CNX_PRINCIPAL.Connected:=FALSE;
DM.CNX_PRINCIPAL.Params.Values['Database']:=vArquivo.ReadString('CNX_BD','DATABASE','');
DM.CNX_PRINCIPAL.Params.Values['UserName']:=vArquivo.ReadString('CNX_BD','USERNAME','');
DM.CNX_PRINCIPAL.Params.Values['Password']:=vArquivo.ReadString('CNX_BD','PASSWORD','');
TRY
DM.CNX_PRINCIPAL.Connected:=TRUE;
EXCEPT
if DM.CNX_PRINCIPAL.Connected=FALSE then
BEGIN
ShowMessage('Falha na conexão com o banco de dados.');
END;
END;
end;
end;
Espero ter ajudado, qual quer dúvida fique a vontade para perguntar...
Você precisa informar o nome do usuário e a senha de conexão com o banco de dados.
Geralmente o firebird usar
user=SYSDBA
Senha=masterkey
ABRA O NOTEPAD E
----------------------------------------------------------------------------------------
[CNX_BD]
DATABASE=CAMIHO DO BANCO DE DADOS
USERNAME=SYSDBA
PASSWORD=masterkey
-----------------------------------------------------------------------------------------
SALVE O ARQUIVO COMO CNX.INI
NA SUA APLICAÇÃO
DECLARE NA USES >>>IniFileS
NO ONCREAT DA APLICAÇÃO
var vArquivo:TIniFile;
Caminho_CONF:string;
begin
Caminho_CONF:=(ExtractFilePath(Application.ExeName) +'CNX.Ini');
if not (FileExists(Caminho_CONF)) then
begin
ShowMessage('Arquivo de conexão com o banco de dados não localizado.');
Application.Terminate;
end
else
begin
vArquivo:=TiniFile.Create(ExtractFilePath(Application.ExeName) +'CNX.Ini');
DM.CNX_PRINCIPAL.Connected:=FALSE;
DM.CNX_PRINCIPAL.Params.Values['Database']:=vArquivo.ReadString('CNX_BD','DATABASE','');
DM.CNX_PRINCIPAL.Params.Values['UserName']:=vArquivo.ReadString('CNX_BD','USERNAME','');
DM.CNX_PRINCIPAL.Params.Values['Password']:=vArquivo.ReadString('CNX_BD','PASSWORD','');
TRY
DM.CNX_PRINCIPAL.Connected:=TRUE;
EXCEPT
if DM.CNX_PRINCIPAL.Connected=FALSE then
BEGIN
ShowMessage('Falha na conexão com o banco de dados.');
END;
END;
end;
end;
Espero ter ajudado, qual quer dúvida fique a vontade para perguntar...
GOSTEI 0