salut,

Je suis en train de coder un petit chat et quand je fais ceci:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub Command3_Click()
DoEvents
Winsock1.RemotePort = "7812"
Winsock1.RemoteHost = txthost.Text
Winsock1.Connect
'Teste
DoEvents
Winsock1.SendData "OK"
DoEvents
Winsock1.SendData "TEST"
End Sub
--------------------------------------------------------------------------
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim Buffer As String
Winsock1.GetData Buffer
'Ajoute les data a list1
DoEvents
List1.AddItem Buffer
End Sub
--------------------------------------------------------------------------
Bon le problem est que quand je recois les datas ils sont collés example: je recois "OKTEST" j'ai essayer toute les facons que je connais mais sans succes je voudrais recevoir les donnés un-a-un "separé" si quelqun peut m'aider j'en serais tres reconnaissant.
Merci d'avance.