ActiveDelphi

[Edilson_alves_de_oliveira]

Boa tarde,

Alguem sabe como fazer um teste na aplicação para saber se está sendo executada no servidor?

Exemplo:

[AbraaoRamiro]

+ ou - assim:




if ((IP_DB = IP_Local) or (IP_DB='') or (IP_DB='127.0.0.1') ) then
begin

ShowMesssage('Essa aplicação esta sendo executada no servidor') ;

end;
_________________
Abraão Ramiro Lima de Paula Programador/Webdesigner

[Edilson_alves_de_oliveira]

Eu tenho firebird instalado local nas estações se dar um comando para pegar IP no banco de dados, vai retornar o ip local também.

E colocar um IP fixo para testar não acho legal.
_________________
Vamos compartilhar nossos conhecimentos.

[AbraaoRamiro]

Kara que componente vc usa pra fazer conexao com o Fire? La onde vc indica o caminho da base de dados (Arquivo .FDB ou .GDB) do servidor vc coloca o IP ou Nome do Servidor? Onde vc salva o caminho do banco, no registro do windonws ou em .ini?

Se na indicacao do caminho da base vc coloca tipo assim:

192.168.0.1:C:\Meu_Sistema\Meu_Banco.fdb

Entao e so pegar o IP da indicacao do caminho...
se ele for = o da Maquina ou nao existir ou for local e pq ta no servidor
_________________
Abraão Ramiro Lima de Paula Programador/Webdesigner

[Edilson_alves_de_oliveira]

Tem muita variação, por exemplo usar o arquivo aliases.conf do firebird ao inves de colocar o IP colocaro nome do micro e ETC.
_________________
Vamos compartilhar nossos conhecimentos.