2010-08-10 133 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 

謝謝!

回答

相關問題