Bonjour,
Je poste un message pour un problème de SOCKET en Visual Basic 6.
Ce problème survient sur un logiciel de chat, le serveur est OK, les client peuve parler entre eux, tout le monde recoit bien le message ! Je souhaite que le serveur puise aussi envoyer des messages. J'utilise ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Private Sub SendMsg_Click()
For k = 0 To TailleTab - 1
    SckChat(Users(k, 0)).SendData "Admin > " & ChatText.Text
Next k
DialChat.Text = DialChat.Text & "Admin > " & ChatText.Text & vbCrLf
End Sub
Il envoi le message a un seul client, je me suis dit que je devais tester les indices du socket, donc j'ai fait :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub SendMsg_Click()
For k = 0 To TailleTab - 1
    MsgBox Users(k, 0)
    SckChat(Users(k, 0)).SendData "Admin > " & ChatText.Text
Next k
DialChat.Text = DialChat.Text & "Admin > " & ChatText.Text & vbCrLf
End Sub
Et ben devinez quoi ??? Vous trouvez pas ??? Tout les client reçoives bien le message , grâce au MsgBox.

Je ne ces pas si c'est du a une répétition trop rapide des l'envoi de message ou ...
Avez vous une solution a mon problème ?
Je vous remercie grandement d'avance de vos réponses