2010-08-10 97 views
0

我想将一个Arraylist发送到我的服务器以向所有其他客户端进行广播,但是我不确定序列化后如何继续发送。这是我在这里:从客户端发送序列化对象到服务器

Private Sub Button1_Click(ByVal sender As System.Object, _ 
     ByVal e As System.EventArgs) Handles Button1.Click 

     Dim BinFormatter As New Binary.BinaryFormatter() 
     Dim FS As New System.IO.FileStream("c:\test.txt", IO.FileMode.Create) 

     Dim i As Integer 
     Dim f As Integer 
     Dim listchkBox As New ArrayList() 
     For Each ctrl As Control In Me.Controls 
      Dim chkbox As CheckBox 
      If TypeOf ctrl Is CheckBox Then 
       i += 1 
       chkbox = ctrl 
       If chkbox.Checked = True Then 
        listchkBox.Add(i) 
       End If 
      End If 
     Next 
     For f = 0 To listchkBox.Count - 1 
      MsgBox(listchkBox.Item(f)) 
     Next 

     BinFormatter.Serialize(FS, listchkBox) 

     ' I am not sure if I am doing right after this 
     ' line I am not sure how to pack it into a stream and 
     ' send across, please advice... 

End Sub 

谢谢!

回答

相关问题