winsocket solo envia al ultimo cliente conectado
Publicado por carrlos (1 intervención) el 20/11/2007 23:13:23
El problema es que cuando varios clientes se conectan al servidor de charla, los mensajes que envia el servidor (que deberian llegar a todos los clientes) de hecho solo le llegan al ultimo que se conecto.
Private Sub btEnviar_Click()
Dim i As Integer
For i = 0 To Winsock2.UBound
If Winsock2(i).State <> sckClosed Then
'esta mal
'solo envia mensajes al ultimo cliente conectado
Winsock2(i).SendData Text2 'en text2 el servidor escribe los mensajes que quiere enviar
End If
Next
Text2 = ""
End Sub
Lo curioso es que los mensajes que envian los clientes al servidor llegan correctamente en todo caso.
Por eso pongo este fragmento del codigo, que es donde supongo que esta el problema.
A ver si podeis ayudarme. Muchas gracias.
Private Sub btEnviar_Click()
Dim i As Integer
For i = 0 To Winsock2.UBound
If Winsock2(i).State <> sckClosed Then
'esta mal
'solo envia mensajes al ultimo cliente conectado
Winsock2(i).SendData Text2 'en text2 el servidor escribe los mensajes que quiere enviar
End If
Next
Text2 = ""
End Sub
Lo curioso es que los mensajes que envian los clientes al servidor llegan correctamente en todo caso.
Por eso pongo este fragmento del codigo, que es donde supongo que esta el problema.
A ver si podeis ayudarme. Muchas gracias.
Valora esta pregunta
0