Winsock - Connection (array)

[Pino]

This amkes no sence to me but on the 2nd connection i get the "ivalid operation at current state" error which means the socket is in use,

Dim x As Long ' counter
If Winsock.UBound < 1 Then 'this is our first connection so accept it
       Load Winsock(Winsock.UBound + 1)
       Winsock(Winsock.UBound).Accept requestID
End If
 
For x = 1 To Winsock.UBound + 1 'loops through existing connections to amke sure we have none spare
   If Winsock(x).State <> sckConnected Then
          Winsock(x).Accept requestID '<<Error here!
   Else
   If x >= Winsock.UBound Then 'there si none spare so accept on new socket
            Load Winsock(Winsock.UBound + 1)
            Winsock(Winsock.UBound).Accept requestID
            Exit Sub
       End If
   End If
Next x

i cant understand maybe its a simple error?

PINO