title: vb6 - sending message into winsock server chat
body: <p>I've a simple winsock server chat and this is the code:</p>
  
  <pre><code>Private Sub Form_Load()
  Winsock1.LocalPort = 5100
  Winsock1.Listen
  End Sub
  
  Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
  Winsock1.Close
  Winsock1.Accept requestID
  End Sub
  
  Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
  Dim sData As String
  Winsock1.GetData sData
  Text1.Text = Text1.Text &amp; sData
  End Sub
  </code></pre>
  
  <p>I receive the message from an ios app but I can't send message with a "sendData".</p>
  
  <p>How can I send message to all the clients? I need to use a client?</p>
  
  <p>Thanks.</p>