Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!

SET CONNECTION to <host>

Propósito

Conectar de forma remota dois ou mais banco de dados na mesma máquina ou em máquinas

distintas

Sintaxe

SET CONECTION TO <host>

Argumentos

<host> - nome do host relacionado a um endereço IP na tabela de hosts.

Utilização

Esta opção deve ser utilizada sempre que uma aplicação cliente-servidor desejar utilizar mais de um banco de dados OpenBASE simultaneamente. Esses Bancos de Dados podem ser iguais ou não e podem estar localizados em diferentes diretórios no mesmo servidor ou em servidores distintos.

Devem-se atribuir diferentes nomes de host ao mesmo endereço IP do servidor com o qual se deseja conectar. Isto deve ser especificado, normalmente, na tabela de hosts (c:\windows\hosts ou /etc/hosts).

Exemplo

prog

if CONNECT("ts8") = .F.  && Estabeleço conexão com máquina ts8

  ? "ERRO NA CONEXÃO COM ts8"

endif

database /usr1/clientes/exemplo  1 a 2 && Abro banco exemplo na máquina ts8

select a

use pessoa

locate

Do While .not. eof()

  ? nome

  ? str(idade)

  wait

  continue

Enddo

if CONNECT("aix") = .F.      && Estabeleço coneção com máquina aix

  ? "ERRO NA COMECAO COM AIX"

endif

database /usr/tsgbd/tsdic/exemplo2 1 a 2 && Abro o banco exemplo2 na máquina aix

select a

use PESSOA

locate

Do While .not. eof()

  ? NOME1

  ? str(IDADE1)

  wait

  continue

Enddo

SET CONNECTION TO "ts8"  && Altero coneção para máquina ts8

database /usr1/clientes/exemplo  1 a 2

select a

use pessoa

locate

Do While .not. eof()

  ? nome_p

  ? str(idade)

  wait

  continue

Enddo

Observações

No exemplo acima, as máquinas de nome "aix" e "ts8" possuem o mesmo endereço IP no arquivo hosts (tabela de hosts).

Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!