4D Internet Commands v16TCP_State |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
4D Internet Commands v16
TCP_State
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| TCP_State ( tcp_ID ; codigoEstado ) -> Resultado | ||||||||
| Parâmetro | Tipo | Descrição | ||||||
| tcp_ID | Inteiro longo |
|
Referencia de uma sessão TCP aberta | |||||
| codigoEstado | Inteiro |
|
Código do estado TCP | |||||
| Resultado | Inteiro |
|
Código de erro | |||||
O comando TCP_State devolve um valor inteiro que indica o estado de uma conexão TCP particular.
tcp_ID contém a referencia de uma sessão TCP aberta com o comando TCP_Open ou TCP_Listen.
O parâmetro codigoEstado é uma variável que devolve um dos seguintes códigos de estado.
| 0 | Conexão fechada |
| 2 | Escuta de uma conexão de entrada |
| 8 | Conexão estabelecida |
Este exemplo assume que foi estabelecida uma conexão TCP válida e se identifica pela variável $tcp_id. Neste exemplo, é enviado um comando a um servidor web para solicitar uma página de informação e os resultados se recuperam em um laço de tipo Repeat. Como os servidores web fecham automaticamente as conexões uma vez realizam sua ação, este método continua recebendo os dados até que a conexão para ou é produzido um erro.
C_LONGINT($tcp_id)
C_INTEGER(vState;$err)
C_TEXT($command;$buffer;$response)
If(TCP_Send($tcp_id;$command)=0)
vState:=0
Repeat
$err:=TCP_Receive($tcp_id;$buffer)
$err:=TCP_State($tcp_id;vState)
$response:=$response+$buffer
Until((vState=0)|($err#0))
End if
Produto: 4D Internet Commands
Tema: IC TCP/IP
Número
88929
Criado por: 4D Internet Commands 6.5
4D Internet Commands ( 4D Internet Commands v16)
Adicionar um comentário