Send Listbox by Winsock

[yakie]

I use a list box to store the user names in the server side of my VB program. i was wondering how can i send the whole list of user names or the user name listbox to my client side of my VB program?

[ChiefRB]

Well, the simplest way would be this:

Dim i As Integer
For i = 0 To List1.ListCount - 1
  If Winsock.State = sckConnected Then
    Winsock.SendData List1.List(i)
    DoEvents
  End If
Next i

Your client would receive it like this:

Private Sub Winsock_DataArrival(ByVal BytesTotal As Long)
Dim Data As String
  Winsock.GetData Data
  MsgBox Data
End Sub