Pegar os servidor de Firebird/interbase na rede

Cara o q vou te falar não testei.

Mas estou pensando nisso para reconhecer o servidor automático. Cria uma aplicação servidora e instale no servidor Interbase /FB ou o q for. Ela escuta a porta 55555 por exemplo.

Em seu cliente quando instalar o software pela primeira vez, dispere um pacote de broadcast na rede para porta 55555. Assim seu servidor vai ter uma mensagem, e pede para ele (servidor) retornar a informação para o cliente de qual é o ip q ele está.

Teoricamente funciona. Futuramente vou implementar isso.
Vc pode utilizar Corba, COM para fazer essa comunicação.

Na revista clube delphi edição 60 saiu algo sobre o assunto. :wink:

Amigo não achei nada nessa edição.

Como não?

Na materia da capa 60 dicas e soluções em delphi, dica N° 20:
Listando todos os computadores da rede que estão rodando interbase/firebird :wink:

Descobrindo onde o IB/FB está rodando na rede:

GetServerNames(ListBox1.Items,Edit1.Text,SV_TYPE_ALL);

for i := 0 to pred(ListBox1.Items.Count) do

if ServerIsRunning(ListBox1.Items[i],3050) then

ListBox2.Items.Add(ListBox1.Items[i]);