Web Mundi

   Preciso uma ajuda urgente. por gentileza...

Estou usando FireBird 1.5.3.4854, Delphi 5 e componentes:
TIBDatabases
TIBTransaction 
TIBSQL
TIBQuery
- No componente TIBDatabases, propriedade DATABASESNAME coloco o caminho do GDB
  (C:\ICCIB\SYS_SIMPLES.GDB ), e na propriedade PARAMS coloco USER_NAME = SYSDBA,
PASSWORD = masterkey
- O problema é o seguinte: quando rodo o programa Delphi no servidor, funcina beleza
  mas quando quero rodar na máquina cliente não funciona e avisa não ter encontrado o GDB (C:\ICCIB\SYS_SIMPLES.GDB) .
  Porém quando, na máquina cliente, uso o IBOConsole, encontro e abro as tabelas do servidor.
 O que faço meus amigos ?  

Autor	Mensagem
Edemar Usuário Novo Registrado: 09 Jul 2007 Localização: Brazil Online Status: Offline Mensagens: 2	Tópico: Problema com FireBird Enviado: 09 Jul 2007 em 9:25am
	Preciso uma ajuda urgente. por gentileza... Estou usando FireBird 1.5.3.4854, Delphi 5 e componentes: TIBDatabases TIBTransaction TIBSQL TIBQuery - No componente TIBDatabases, propriedade DATABASESNAME coloco o caminho do GDB (C:\ICCIB\SYS_SIMPLES.GDB ), e na propriedade PARAMS coloco USER_NAME = SYSDBA, PASSWORD = masterkey - O problema é o seguinte: quando rodo o programa Delphi no servidor, funcina beleza mas quando quero rodar na máquina cliente não funciona e avisa não ter encontrado o GDB (C:\ICCIB\SYS_SIMPLES.GDB) . Porém quando, na máquina cliente, uso o IBOConsole, encontro e abro as tabelas do servidor. O que faço meus amigos ?
	Sil

	IP gravado

clegsantos Usuário Novo Registrado: 29 Jan 2009 Localização: Brazil Online Status: Offline Mensagens: 2	Enviado: 30 Jan 2009 em 4:11pm
	Amigo tente isso : procedure TDM.conexao_JHPBeforeConnect(Sender: TObject); var configINI: TIniFile; begin if not FileExists(ExtractFilePath(Application.ExeName)+'CONFIG.INI') then begin //testa a existencia do arquivo ini, caso não encontre então cria-se. configINI:= TIniFile.Create(ExtractFilePath(Application.ExeName)+'CONFIG.INI'); configINI.WriteString('CONEXAO','SERVIDOR',(ExtractFilePath(Application.ExeName)+'soft_cesmt.FDB')); end else configINI:= TIniFile.Create(ExtractFilePath(Application.ExeName)+'CONFIG.INI'); conexao_JHP.Params.Values['DataBase']:=configINI.ReadString('conexao','servidor',''); configINI.Free; end; >>>>>> Adpte para seu caso. e munde no arquivo INI criado o caminho do banco como vc quiser desde que ele realmente exista.
	Cleber S. Santos
	IP gravado

	Tópicos recentes Membros Calendário Procurar Ajuda
	Registrar Entrar

Firebird e Interbase
Web Mundi - Fóruns :Bancos de Dados :Firebird e Interbase