Conectar de forma remota dois ou mais banco de dados na mesma máquina ou em máquinas distintas
SET CONECTION TO <host>
<host> - nome do host relacionado a um endereço IP na tabela de hosts.
Esta opção deve ser utilizada sempre que uma aplicação cliente-servidor desejar utilizar mais de um banco de dados Openbase,( podem ser iguais ou não) localizados em diferentes diretórios no mesmo servidor ou em servidores distintos. Deve-se atribuir diferentes nomes ao mesmo endereço IP do servidor que se deseja conectar, na tabela de hosts(c:\windows\hosts).
prog
if CONNECT("marte") = .F. && Estabeleço coneção com máquina marte – sco-unix
? "ERRO NA CONECAO COM ts8"
endif
database /usr1/clientes/exemplo 1 a 2 && Abro banco exemplo na máquina marte
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 /usr1/clientes/exemplo 1 a 2 && Abro o banco exemplo na máquina aix
select a
use PESSOA
locate
Do While .not. eof()
? NOME1
? str(IDADE1)
wait
continue
Enddo
SET CONNECTION TO "marte" && Altero coneção para máquina sco-unix
database /usr1/clientes/exemplo 1 a 2
select a
use pessoa
locate
Do While .not. eof()
? nome_p
? str(idade)
wait
continue
Enddo
Observação: As máquinas de nome "aix" e "ts8", possuem diferentes endereço IP no arquivo hosts (tabela de hosts). O banco de dados exemplo é o mesmo nas duas máquinas.