Histórico da Página
...
Bloco de código | ||
---|---|---|
| ||
TCLink( [ cConn ], [ cServerAddr ], [ nPort ] ) |
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
cConn | caractere | Indica a string de conexão do DBAccess, composta por um identificador do tipo da conexão mais o nome do "alias/environment" da conexão. (Padrão = DBDatabase e DBAlias configurado no appserver.ini) |
cServerAddr | caractere | Indica o nome ou endereço IP do servidor onde está o DBAccess onde a conexão deve ser realizada. (Padrão = DBServer configurado no appserver.ini) |
nPort | numérico | Indica o número da porta TCP que o DBAccess está configurado aguardando por novas conexões. (Padrão = DBPort configurado no appserver.ini). |
Retorno
Nome | Tipo | Descrição |
---|---|---|
nHwnd | numérico | Retorna um identificador numérico igual ou maior que zero para a conexão em caso de sucesso. Em caso de falha, será retornado um número negativo, indicando uma ocorrência de falha na conexão. |
Observações
Através da função TCLink é possível abrir uma nova conexão em um banco de dados (SGBD) através do DBAccess. sApenas Apenas após realizar uma conexão é possível utilizar a RDD "TOPCONN".
...
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
USERuser FUNCTIONfunction TESTexemplo() Locallocal cDBOracDB := "POSTGRES/dsn" // alterar o alias/dsn para o banco/conexão que está utilizando Locallocal cSrvOra cSrv := "localhost" // alterar para o ip do DbAccess nHwnd := TCLink(cDBOracDB, cSrvOracSrv, 7890) if nHwnd >= 0 conout("Conectado") endif TCUnlinkTCUNLink() RETURNreturn |