Altera a conexão corrente.
Sintaxe
TCSETCONN( nConexaoCorrente ) –> Lógico
| Argumento | Obrigat. | Tipo | Descrição |
| nConexaoCorrente | Sim | Numérico | Indica o número da conexão que deve se tornar a corrente. Este número foi retornada pela função TCLINK. |
| Retorno | Descrição |
.T. | Conexão corrente trocada com sucesso |
| .F. | Conexão não encontrada |
Descrição
Altera a conexão corrente. Novas tabelas abertas ou criadas utilizarão esta conexão para realizar a operação. É útil quando se tem mais de uma conexão com o TopConnect.
Exemplo
_nCon1 := TCLink(“MSSQL7/TOPSQL1”, “TOPSERVER1”)
If (_nCon1 < 0)
CONOUT(“Falha Conexao TOPCONN 1 – Erro: “+ str(_nCon1, 10, 0))
return .F.
EndIf
_nCon2 := TCLink(“MSSQL7/TOPSQL2”, “TOPSERVER2”)
If (_nCon2 < 0)
CONOUT(“Falha Conexao TOPCONN 2 – Erro: “+ str(_nCon2, 10, 0))
return .F.
EndIf
USE CLIENTES VIA “TOPCONN” NEW // Tabela de clientes será aberto em _nCon2
TCSETCONN(_nCon1)
USE PEDIDOS VIA “TOPCONN” NEW // Tabela de pedidos será aberto em _nCon2
.
.
.
TCQUIT()
RETURN .T.
TCLINK( )