TCP_State

4D v20 R7

TCP_State


TCP_State ( tcp_ID ; codigoEstado ) -> resultado

Parámetro	Tipo	Descripción
tcp_ID	Entero largo	Referencia de una sesión TCP abierta
codigoEstado	Entero	Código del estado TCP
resultado	Entero	Código de error

Descripción

El comando TCP_State devuelve un valor entero que indica el estado de una conexión TCP particular.

tcp_ID contiene la referencia de una sesión TCP abierta con el comando TCP_Open o TCP_Listen.

El parámetro codigoEstado es una variable que devuelve uno de los siguientes códigos de estado.

0	Conexión cerrada
2	Escucha de una conexión entrante
8	Conexión establecida

Este ejemplo asume que se estableció una conexión TCP válida y se identifica por la variable $tcp_id. En este ejemplo, se envía un comando a un servidor web para solicitar una página de información y luego se introduce un bucle para recibir los resultados. Como los servidores web cierran automáticamente las conexiones una vez realizan su acción, este ejemplo continúa recibiendo los datos hasta que la conexión se detiene o se produce un error.

 C_LONGINT($tcp_id)

 C_LONGINT(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

Ver también

TCP_Listen
TCP_Open

TCP_State

Descripción

Ejemplo