Pending

Previous  Next

---

Returns true if one or more clients are waiting for a connection.

Using the Pending property you could avoid the server application from blocking while waiting for the connection.

Syntax: Pending

Example:

Sub App_Start

      server.New1(50000)

      server.Start

      Timer1.Enabled = true

End Sub

Sub Timer1_Tick

      if server.Pending = true then

            Timer1.Enabled = false

            client.Value = server.Accept

            ... 'Do the communication here

      end if

End Sub