Some of that the server end of my chat room are getting combined when sent out. I read off another thread to Winsock1_SendComplete And A Do..Loop to "slow" the server down. The problem my server end is an array and i can't figure out how to code the Winsock1_SendComplete to work properly. Here's The Code.
Private Sub SendAll(Data As String)
On Error Resume Next
For All = Server.LBound To Server.UBound
Complete = False
Server(All).SendData Data
Do Until Complete = True
DoEvents
Loop
Next All
End Sub
Private Sub Server_SendComplete()
Complete = True
End Sub
The Send Complete I pasted of course doesnt work because Server is an array. How should I code this??
