Separation de data

salut,

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

Code:

---

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:

---

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 :cry: je voudrais recevoir les donnés un-a-un "separé" si quelqun peut m'aider j'en serais tres reconnaissant.
Merci d'avance.

tout depends du serveur et de la façon qu'il construit ses envois.
examine les caractères contenus dans buffer, tu y trouveras probablement la sequence qui sépare les différents eléments

oui mais tu crois que l'erreur est dans l'envoie des datas ou dans data arrival?

si tu as la possibilité d'agir sur l"envoi des datas, mette un vbCrLf au bout de chaque data envoyée serait bien utile, non ?
ensuite etablis un dialogue, le serveur n'envoie la suite que quand le client a répondu ok par exemple

VBCrlf a fonctionné! merci beaucoup