UDP zakousnutí při komunikaci VB.NET   otázka

VB.NET

Mám prosbu nedávno jsme zde řešil problám s UDP na WINDOWS IOT, nic méně rady mně moc pomohly ale zasekl jsme se zase asi na uplné blbosti. Dal jsme dokupy terstovací kód viz níže.

problém je vtom že jakmile dojde k provedení "i = server.Receive(bytes)" aplikace se kousne.

Můžiu poprosít zase o popostrčení o krok dále ?

Moc díky...

Sub test_sub_2()
        Dim bindAddress As IPAddress = IPAddress.Any
        Dim udpSocket As New Socket(bindAddress.AddressFamily, SocketType.Dgram, ProtocolType.Udp)
        Dim remoteEndPoint As New IPEndPoint(New IPAddress(0), 5150) ' (IPAddress.Any, 4444)
 
        udpSocket.Bind(remoteEndPoint)
 
        test_2(udpSocket)
   
    End Sub
    Function test_2(server As Socket)
        Dim msg As Byte() = Encoding.UTF8.GetBytes("This is a test")
        Dim bytes(255) As Byte
 
        Try
            ' Blocks until send returns.
            Dim i As Integer
            ' i = server.Send(msg)
     
 
            ' Get reply from the server.
            i = server.Receive(bytes)
            UDPListBox.Items.Add(Encoding.UTF8.GetString(bytes))
        Catch e As SocketException
            UDPListBox.Items.Add(e.Message)
        End Try
        Return 0
    End Function
nahlásit spamnahlásit spam 0 odpovědětodpovědět
                       
Nadpis:
Antispam: Komu se občas házejí perly?
Příspěvek bude publikován pod identitou   anonym.
  • Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
    Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.
  • Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

přihlásit pomocí externího účtu

přihlásit pomocí jména a hesla

Uživatel:  
Heslo:  

zapomenuté heslo

 

založit nový uživatelský účet

zaregistrujte se

 
zavřít

Nahlásit spam

Opravdu chcete tento příspěvek nahlásit pro porušování pravidel fóra?

Nahlásit Zrušit

Chyba

zavřít

feedback