[firebase-br] RES: Configurar sistema para rodar na rede ???

Francisco Junior junior em lagsistemas.com.br
Sex Nov 25 11:42:48 -03 2011


A outra é a GDS32.dll.

-----Mensagem Original----- 
From: Reijanio Nunes Ribeiro
Sent: Friday, November 18, 2011 6:24 PM
To: FireBase
Subject: Re: [firebase-br] RES: Configurar sistema para rodar na rede ???

do delphi 2007 pra frente usa dbx4 e se não me engano precisa de mais 3
dll's alem da midas.dll,fbclient.dll,
não me recordo o nome mais acho que é dbxcommon, dbx.... tem umas video
aulas do rodrigo carreiro que falam sobre dbx4 se for o que vc usa

Em 18 de novembro de 2011 08:46, Zottis <bzottis em ig.com.br> escreveu:

> o firewall do XP ta Liberado, e o do servidor? É este XP?
> No servidor coloca para liberar o fbserver.exe
>
> Tenta também pelo IBExpert para ver se é o FB que esta bloqueado ou a tua
> aplicação que não está acessando.
>
>
> -----Mensagem original-----
> De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br]
> Em
> nome de Nilton Oliveira
> Enviada em: sexta-feira, 18 de novembro de 2011 01:40
> Para: FireBase
> Assunto: [firebase-br] Configurar sistema para rodar na rede ???
>
> Pessoal, meu sistema está todo configurado para rodar na rede e não
> condigo.
> informa: 'Não foi possivel conectar ao banco de dados!
>
> uso delphi xe, firebird 2.5;
> a rede windows xp está funcionando tudo ok; firewall do xp está 
> desativado;
>
> No delphi:
>
> na uses do datamodulo coloquei Midaslib
>
> no datamodule:
> --------------
>  var
>  DataModule1: TDataModule;
>  BancoDeDados : String;
>  ArquivoINI : TIniFile;
>
> procedure TDataModule1.sqlConnection1BeforeConnect(Sender: TObject); const
>  FileName = 'config.ini';
> var
>  conexao : String;
>  IniFileName : TIniFile;
> begin
>  IniFileName := TIniFile.Create(ExtractFilePath(ParamStr(0))+FileName);
>  Try
>    conexao := Trim(IniFileName.ReadString('Acesso','Database',''));
>  Finally
>    IniFileName.Free;
>  end;
>  sqlConnection1.ConnectionName  := conexao; end;
>
> procedure TDataModule1.DataModuleCreate(Sender: TObject); var i : Integer;
> begin
>  if not FileExists(ExtractFilePath(Application.ExeName)+'config.ini') then
>  begin
> ArquivoINI :=
> TIniFile.Create(ExtractFilePath(Application.ExeName)+'config.ini');
>
> ArquivoINI.WriteString('Acesso','Database',(ExtractFilePath(Application.ExeN
> ame)+'sistema.fdb'));
> BancoDeDados := ArquivoINI.ReadString('Acesso','Database','');
> sqlConnection1.ConnectionName := BancoDeDados; sqlConnection1.Connected :=
> TRUE; for i := 0 to ComponentCount - 1 do
>    begin
>      if Components[i] is TSQLConnection then
>        (Components[i] as TSQLConnection).Connected := TRUE;
>    end;
>    ArquivoINI.Free;
> end
> else
>    try
>      sqlConnection1.ConnectionName := BancoDeDados;
>      sqlConnection1.Connected := TRUE;
>      for i := 0 to ComponentCount - 1 do
>      begin
>        if Components[i] is TSQLConnection then
>          (Components[i] as TSQLConnection).Connected := TRUE;
>      end;
>      Application.MessageBox('Conexão realizada com sucesso!','CONEXÃO 
> OK');
>      ArquivoINI.Free;
>    except
>      Application.MessageBox('Não foi possivel conectar ao banco de
> dados!','CONEXÃO FALHOU');
>    end
> end;
>
> no arquivo config.ini:
> ----------------------
>
> [Acesso]
> DriverUnit=DBXFirebird
> DriverPackageLoader=TDBXDynalinkDriverLoader,DbxCommonDriver150.bpl
>
> DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxC
>
> ommonDriver,Version=15.0.0.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
>
> MetaDataPackageLoader=TDBXFirebirdMetaDataCommandFactory,DbxFirebirdDriver15
> 0.bpl
>
> MetaDataAssemblyLoader=Borland.Data.TDBXFirebirdMetaDataCommandFactory,Borla
>
> nd.Data.DbxFirebirdDriver,Version=15.0.0.0,Culture=neutral,PublicKeyToken=91
> d62ebb5b0d1b1b
> GetDriverFunc=getSQLDriverINTERBASE
> LibraryName=dbxfb.dll
> VendorLib=fbclient.DLL
> Role=RoleName
> MaxBlobSize=-1
> TrimChar=False
> ErrorResourceFile=
> ServerCharSet=
> drivername=FIREBIRD
> blobsize=-1
> commitretain=False
> localecode=0000
> rolename=RoleName
> sqldialect=3
> isolationlevel=ReadCommitted
> waitonlocks=True
> trim char=False
> Database=servidor:d:\projeto\sistema.fdb
>
> usei também o ip do servidor e nada de funcionar
>
> Database=192.168.1.22:d:\projeto\sistema.fdb
>
> sempre a mesma informação do Application.MessageBox:
> 'Não foi possivel conectar ao banco de dados!
>
> Onde está o erro ???
> A quem possa aguardo ajuda
>
>
> Grato
> Nilton Oliveira
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br Para
> saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> -----
> Nenhum vírus encontrado nessa mensagem.
> Verificado por AVG - www.avgbrasil.com.br
> Versão: 2012.0.1869 / Banco de dados de vírus: 2092/4622 - Data de
> Lançamento: 11/17/11
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use: 
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa 





Mais detalhes sobre a lista de discussão lista