monSocket.SendData Chr$(0) & CStr(maVar1) & Chr$(1) & CStr(maVar2) & Chr$(1) & CStr(maVar3) & Chr$(255)
monSocket.SendData Chr$(0) & CStr(varPseudo) & Chr$(1) & CStr(VarMess) & Chr$(255)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionWinsock1.SendData (txtPseudo.Text & " dit:" & vbCrLf & txtSend.Text)
Winsock2.GetData strData, vbString txtStatus.Text = txtStatus.Text & vbCrLf & _ strData & vbCrLf
Winsock1.SendData (txtPseudo.Text & ":" & vbCrLf & txtSend.Text)
Dim strData As String Winsock2.GetData strData, vbString msgsplit = Split(strData, ":") txtStatus.Text = txtStatus.Text & vbCrLf & Msgsplit(0) & " dit :" & vbCrLf & _ msgsplit(1) & vbCrLf
je sais pas si c'est la method la plus propre