I have a client/server application using Winsock TCP communications. **My server must be able to accept** **up to 3,000 concurrent connections** while my actual code accept less than 1,500. Here is my actual code:
*Private Sub wsClients3_ConnectionRequest(Index As Integer, ByVal requestID As Long)
On Local Error GoTo wsClients3_ConnectionRequest_Error
If Index = 0 Then
'UboundClients3 : Global variable. Contains the number of connected clients
UboundClients3 = UboundClients3 + 1
'Create a new client connection
wsClients3(UboundClients3).LocalPort = 0
'Process the returned error
***Help is required to solve this problem.**
1) Complete VB6 source code solving my problem, with comments helping to understand the solution.
2) Complete ownership and distribution copyrights to all work purchased.
Must work on any Win32 Windows platforms and be written in Visual Basic 6 (SP5), english edition.