From: computer_hero@coldmail.com   
      
   ( as usual I "forgot" to attach the code ;(   
   Private Sub Wsock_DataArrival(ByVal bytesTotal As Long)   
     Dim byteData(256) As Byte   
     Dim i As Integer   
     Text4.Text = bytesTotal   
     Text3.Text = ""   
     Wsock.GetData byteData(), vbArray + vbByte, bytesTotal   
     For i = 0 To bytesTotal - 1   
       Text3.Text = Text3.Text + Hex$(byteData(i))   
     Next   
   End Sub   
   /Henning   
   "Henning"  skrev i meddelandet   
   news:41b0c1f0$0$91256$57c3e1d3@news3.bahnhof.se...   
   > Hi grp!   
   > Trying to receive a udp msg in vb6, but it shows only zeros. What have I   
   > missed?   
   >   
   > /Henning   
   >   
   > --   
   > Time is present only to prevent everything from happening at once.   
   > Still it seems that everything happens at once.   
   > Then there must be a bug in time.   
   > To find the bug in time, isn't that what we all hope for.   
   >   
   >   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)